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ABSTRACT 



The goal of this thesis is to automate recommendations to the Officer of the 
Deck when decisions are made concerning situations that involve risk of collision. A 
rule-based expert system is designed and implemented as a solution to this task. The 
rules are based on regulations in the U.S. Coast Guard manual, Navigation Rules 
International- Inland. The expert system receives facts that describe the current 
situation, then searches the rule base for matching rules. The searching method is a 
hybrid form of forward chaining that searches cyclically through the rule base until all 
matches, intermediate and final, are located. The conclusions of the matching rules are 
displayed as a recommendation to the system user. The resulting system provides a 
valuable input to the OlTicer of the Deck, ser\’ing to increase the speed and reliability 
of the final decision by removing the necessity of manually looking up regulations or 
relying on memorization. 
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THESIS DISCLAIMER 



/ >' ‘ 



The reader is cautioned that computer programs developed in this research may 
not have been exercised for all cases of interest. While every effort has been made, 
within the time available, to ensure that the programs are free of computational and 
logic errors, they cannot be considered validated. Any application of these programs 
without additional verification is at the risk of the user. 
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1. INTRODUCTION 



The International Regulations for Preventing Collisions at Sea, 1972 
(commonly called the 72 COLREGS) must be followed by all public and private 
vessels of the United States while navigating upon the high seas. The Navigation 
Rules For Harbors, Rivers, and Inland Waters and the Pilot Rules For Inland 
Waters govern vessels within specified inland waters of the United States. All of 
these rules are contained in [Ref 1] henceforth referred to as CG-169. Much like the 
traffic laws that regulate the manner in which we operate vehicles on the streets and 
highways, CG-169 regulates the navigation of ships in international and inland 
waters: 

These navigation requirements have the primary purpose of preventing collisions 
between vessels. It is imperative that all 'persons operating vessels be 
knowledgeable of them. Strict compliance is necessary to insure the 
safety oT vessels and passengers. [Rel. 1; p. ii] 

As the persoa responsible for the safe navigation of Navy ships at sea, the 
Officer of the Deck must make sound maneuvering decisions when operating 
within sight of other vessels or under restricted visibility conditions. Numerous 
data are collected which describes the current situation. Then the situation is 
compared to the various rules in CG-169 which • may apply. The applicable 
rules must be used together to arrive at the correct maneuvering decision. The 
entire process from data collection to decision making can often be time consuming 
and difficult to follow. Quite often, the Officer of the Deck uses CG-169 from 
memory, which introduces an increased risk of mistake. 

This study will examine the use of an automated system to provide the Officer 
of the Deck with a fast, reliable recommendation to use in the decision-making 
process described above. We chose to build a particular kind of automated system 
referred to as a rulebased expert system. An expert system "mimics human 
reasoning by generating prospective solutions to a stated problem, then identifying the 
most likely candidate." [Ref 2] Most rule-based expert systems consist of three main 
elements: a rule base, an inference engine, and a user interface. The rule base is a 
collection of rules relating to a particular subject. The rules are usually in the form 
of IF. ..THEN statements as shown in Figure 1.1. 
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IF 

TIME = DAY. 

TARGET ANGLE IS PORT FWO. 

RELATIVE BRG IS STBD FWO. 

THEN 

YOU ARE GIVE-WAY VESSEL. MANEUVER TO AVOID CONTACT. 
TURN STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 



Figure 1. 1 Sample I F...THEN Rule. 

The inference engine compares current facts to the rule base and provides 
corresponding conclusions. The user interface allows communication between the 
user and the system. 

Although mankind has long pondered- the human problem solving method, 
serious attempts to build machines that model human reasoning were not made until 
the 1960's. Alan Newell and Herbert Simon were two of the earliest researchers 
in the area of e.xpert computer programs. Their program, General Problem Solver 
(GPS), was one of the first to use rules as a basis for solving problems. [Ref. 3] Also in 
the 1960's, Stanford University produced a mass-spectrography expert system that was 
used to isolate organic compounds. Probably the most famous of the early expert 
systems, MYCIN, was also developed at Stanford by the Heuristic Programming 
Project (HPP). MYCIN could provide a systemic diagnosis of bacterial infections 
and recommend an effective therapeutic regimen. The knowledge base and simple 
rule-based processing method that formed the framework of MYCIN has become the 
working model for most modern expert systems. (Ref 4] The wide range of 
applications for expert systems coupled with their increasing popularity suggests that 
expert systems may very soon become a part of our everyday existence. 

Every possible situation involving risk of collision between vessels at sea 
can be described by a small set of facts. However, numerous combinations of facts 
are possible, resulting in numerous, but a finite number of possible situations. The 
regulations in CG-169 govern every situation, but the process of matching the 
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facts to the proper regulations is not always simple. "The human mind can weigh 
only seven possibilities at any one time, it's said, but a computer program can 
consider several hundred." [Ref. 5] 

The decision to use an expert system as a solution to this task is based on criteria 
as stated by D.A. Waterman. He says that the existence of genuine experts is one of 
the criteria necessaiy for the effective use of an expert system. He further states that 
these experts must agree on their solutions. The expertise used for the development of 
this system is provided by a panel of navigation experts who are convened periodically 
by the United Nations to update the existing regulations. These regulations are 
published in CG-169. However, it could be argued that the real experts are the 
commanding officers of the vessels. Although they are not allowed to make their own 
interpretations of the regulations, they are the individuals responsible for the safety of 
their vessels, and who use CG-169 to prevent collisions. Waterman also states as an 
additional criteria that a task should require only cognitive skills. The task that this 
thesis tries to solve requires purely cognitive skills with no physical manipulation 
required. [Ref. 6] 

Specially, a rule-based expert system was chosen as a solution due to the nature 
of the task involved. The description of a meeting situation between two vessels and 
the corresponding conclusion, in accordance with CG-169, fit easily into the 
IF.. .THEN format used in most rule-based systems. Also, this task is well-suited to the 
concept of forward chaining that is used in rule-based systems. Forward chaining is the 
process by which a collection of facts can be used to infer one of severaf conclusions 
by matching the IF part of a rule in the rule base. Since this task requires that a 
conclusion must be made from a collection of facts, the rule-based expert system using 
forw'ard chaining was selected for this task. 

It is not suggested that this expert system should become the sole input to this 
decision-making process, instead it should be considered a recommendation to assist in 
reaching prompt, correct decisions. 

This study will attempt to answer the following questions concerning the 
use of expert systems: 

1. Can the regulations in CG-169 be expressed in a symbolic form that will allow 
them to be utilized in a rule base for an expert system? 

2. Can an expert svstem provide prompt, correct recommendations to 
the Officer of the Deck, in a user-friendly way? 
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These questions are addressed in Chapter III, a report of an expert system 
design, and are answered in Chapter V, summary’ and conclusions. Chapter II 
proxides a background on the use of CG-169 by a typical XaNW bridge watch-team. 
Chapter IV discusses testing methods that were used. .Appendix .A shows interactive 
sessions %tith the system in variety of situations, .Appendix B is the source code listing 
of the program, and .Appendix C and Appendix D show the international and inland 
rule bases, respectively, in coded and decoded format. 



II 



II. BACKGROUND 



A. RISK OF COLLISION 

To better understand the manner in which a Navy OfTicer of the Deck utilizes 
CG-169, it is necessary to have a general knowledge of the regulations contained in 
CG-169. This chapter provides a basic discussion of those regulations. 

Since the main purpose of CG-169 is the prevention of collisions, it is important 
to understand how the risk of collision is determined. CG-169 states "such risk shall be 
deemed to exist if the compass bearing of an approaching vessel does not appreciably 
change." [Ref 1: p.lO] Risk of collision can be determined either visually or by use of 
radar. 



B. MEETING SITUATIONS 

CG-169 defines three meeting situations that are possible when the risk of 
collision exists. Vessels at sea are said to be meeting when their present course and 
speed result in the vessels coming within a short distance of each other or, if no action 
is taken, result in a collision. Although there are differences in the specific wording of 
the international and inland regulations, both sets of regulations define the same three 
situations.' Both definitions will be referenced, but only one will be quoted. 

The head-to-head situation exists when "vessels are meeting on reciprocal or 
nearly reciprocal courses." [Ref 1: pp.18,117] The phrase "reciprocal courses" describes 
the situation where two vessels are steering courses that are exactly opposite of each 
other. The overtaking situation exists when a vessel is "coming up with another vessel 
from a direction more than 22.5 degrees abaft her beam," where the phrase "coming up 
with another vessel" describes the action of one vessel approaching another from the 
rear, and the phrase "22.5 degrees abaft her beam" means that a vessel is approaching 
at an angle greater than 22.5 degrees beyond an imaginary line that would run through 
the center of the vessel being overtaken and be perpendicular to its' course. 
[Ref I:pp.l6,ll9] The crossing situation exists when "vessels are approaching each 
other at right angles or obliquely . . ., other than when one steam vessel is overtaking 
another." [Ref 1: pp.18,125] 

The regulations in CG-169 are designed for meeting situations between only two 
vessels. If shipping tralTic other than the vessel that currently poses a risk of collision 
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could potentially also pose a risk of collision, the maneuvering decisions must be made 
individually in the order of the next vessel that will pose the most eminent risk of 
collision. 

C. TARGET ANGLE 

The meeting situations defmed above are normally determined visually. An 
important factor in determining the meeting situation is the visual aspect, or target 
angle, of the approaching vessel. The target angle is usually determined by estimating 
the compass bearing of the observer's vessel relative to the approaching vessel's course. 
The estimation is made by means of visual sighting in daylight hours and by observing 
standard lighting configurations at night. The lighting configurations are defined in 
CG-169 and shown here in Figure 2.1. The meeting situation- is then determined by 
combining the target angle of the approaching vessel with its' compass bearing relative 
to the heading of the observ^er's vessel. 

D. GIVEWAY AND STANDON DESIGNATIONS 

CG-169 assigns a specific status to each of the vessels involved in the meeting 
situations defined above. For crossing and overtaking situations, one vessel is assigned 
the status of giveway vessel and is "directed to keep out of the way" of the other vessel, 
[Ref 1: pp.l8,119] while the other vessel is assigned the status of standon vessel and 
"shall keep her course and speed". [Ref 1: pp.20,118] For the head-to-head situation, 
both vessels are assigned giveway status. [Ref 1: pp.18,117] 

E. SPECIAL STATUS OF VESSELS 

The international regulations also define a special status for: 

• vessels not under command 

• vessels restricted in their ability to maneuver 

• vessels engaged in fishing 

• vessels engaged in trawling 

• sailing vessels under sail 

• vessels constrained by their draft 

CG-169 defines special lighting configurations for the hours from sunset to sunrise and 
dayshapes for the remaining hours that signal a vessel's special status. The vessel with 
a special status w’ill always be assigned the status of standon vessel regardless of the 
status that would have normally been assigned. The one exception to this regulation 
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Figure 2.1 Standard Lighting Diagram. 
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occurs when a vessel 'v^ith special status is overtaking another vessel in which case the 
normal regulation is invoked. [Ref. 1: pp.20,22] Determination of standon, giveway, 
and special status, if it exists, in every meeting situation is necessary to ensure the safe 
passage of both vessels. 

F. SPECIAL TASKING IN INLAND WATERS 

The inland regulations specify five vessel tasks which require special attention or 
action from approaching vessels. These tasks are: 

• laying cable 

• dredging 

• servicing navigation aids 

• towng of submerged objects 

• vessels at anchor 

Special lighting configurations and dayshapes are defined for these tasks. 

G. RESTRICTED VISIBILITY 

CG-169 contains regulations that define proper conduct of vessels in or near 
areas of restricted visibility. Both sets of regulations define similar conduct situations 
where a vessel' hears the fog signal of another vessel, but only the international 
regulations define conduct for the situation where a vessel detects .another vessel by 
radar alone. [Ref 1: pp.22,116] 

H. ACTION BY THE OFFICER OF THE DECK 

When the risk of collision is determined, the Officer of the Deck must promptly 
review' all data pertinent to the situation. There are various sources for this data 
including visual and radar detection. Target angle and special status can be determined 
visually, night or day, if visibility conditions permit. Data from radar equipment can be 
utilized on a manual plotting device called a maneuvering board. Any changes in the 
distance to a vessel and'or the compass bearing of a vessel are plotted on the 
maneuvering board and provide a trace of the relative motion between the two vessels. 
The maneuvering board also provides the course, speed, closest point of approach, and 
target angle of an approaching vessel. Once all available data has been collected, the 
Officer of the Deck, by some method, references CG-169 to determine the proper 
action for the current situation. 
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Automated systems exist, and are used onboard Naval ships, that provide 
recommendations to avoid collision. The recommendations from these systems are 
good input into the decision-making process, but they do not take into account the 
regulations in CG-169. These automated systems, such as the Collision Avoidance 
System developed by Raytheon, allow only a minimum-distance parameter as input, 
then the system will give recommendations to maintain that minimum distance from 
any approaching vessel. However, the recommendation does not consider which of the 
two vessels should actually maneuver, so the Officer of the Deck must reference 
CG-169 before the recommendation can be followed. The expert system discussed in 
Chapter I, with its reference to CG-169 would be a valuable, additional input to the 
Officer of the Deck. 
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III. DESIGN AND IMPLEMENTATION 



A. PROBLEM STATEMENT 

As stated in Chapter I, when a risk of collision exists, the Officer of the Deck 
must review’ the data that describes the meeting situation, then reference CG-169, 
either literally or by memoiy’, to determine the proper course of action that will prevent 
a collision. This process can be time-consuming and prone to error, especially if the 
Officer of the Deck relies heavily upon his memorization of CG-169. The goal of this 
thesis is to design and implement a rule-based expert system that w’ill assist the Officer 
of the Deck in making prompt, correct maneuvering decisions when the risk of collision 
exists. 

This expert system should receive as input data, a set of facts that describe the 
meeting situation, and it should provide as output, intermediate conclusions that 
interpret dayshapes and special lighting patterns and also, final conclusions that serve 
as input to the Officer of the Deck for use in making correct maneuvering decisions. 

B. FUNCTIONAL SPECIFICATIONS 

1. Rule Base 

The rule base, or knowledge representation, in a rule-based expert system 
consists of a set of rules that are able to make recommendations or decisions when 
compared to a set of facts that describe a certain situation. The rule base in this expert 
system will be a collection of rules that equate to IF.. .THEN statements. [Ref 7] Each 
rule will consist of two parts. First is a conditional or IF part that describes a meeting 
situation which could possibly exist between two vessels. The second part of the rule is 
a conclusion that is correct, in accordance with CG-169, for the situation described in 
the conditional part. 

As discussed in Chapter II, tw'o separate sets of regulations are included in 
CG-169. One governs vessels operating in designated international waters and the other 
governs vessels operating in designated inland waters. Therefore, the rule base must 
contain rules for both sets of regulations. The rule base w’ill also contain special 
semantics rules, not taken from CG-169, which w’ill be discussed later. 
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2. User Interface 

Since the Officer of the Deck can not allow his attention to be monopilized by 
any single function for a period longer than one or two minutes, the user interface 
must require only a minimal amount of his time, especially for user input to the 
system. The input format should be short and concise to reduce the time required for 
entry of data and to reduce the probability of syntactic errors. To provide a robust user 
interface, the parsing function will be flexible enough to handle slight variations in the 
user input, as long as it is syntactically correct. Examples of types of data that may be 
required as input to the system are listed below. Specific data required will vary 
according to the actual situation. 

• time of day 

• visibility conditions 

• standard lighting patterns observed 

• special lighting patterns observed 

• dayshapes observed 

• true compass bearing of a vessel 

• true compass heading of a vessel 

• visual aspect of a vessel 

• true compass heading of own ship 

This data will be referred to collectively as the fact base. 

As output, the system will display a recommendation in accordance with 
CG-169 and a brief description of the rule that was matched by the fact base. This will 
allow the user to know exactly which conditions the system used as the basis for 
reaching the recommendation. Also, interpretations of special lighting patterns and 
dayshapes ixill be displayed as intermediate conclusions. 

3. Inference Engine 

The inference engine provides the problem-solving knowledge for the expert 
system by referencing the rule base and finding the correct rule for the situation as 
described by the fact base. The matching rule must represent the conditions necessary 
for reaching a correct conclusion. The conclusion part of the matching rule will be 
output as a recommendation. This method of establishing the fact base then searching 
through the rule base until any intermediate conclusions and the final conclusion are 
found is known as hybrid forward-backward chaining. If no match is found, a message 
to the user will be displayed that says no match exists and the system has determined 
that no risk of collision exists. 



18 



4. Error Handling 

This expert system will detect both syntactic and semantic errors in the user 
input and handle them in a user-friendly manner. When an error is detected, an error 
message will be displayed notifying the user of the type of error detected, then the user 
will be allowed to re-enter the data. 

5. Performance Criteria 

This system will provide recommendations fast enough to allow the user to 
utilize the recommendation to assist in avoiding a collision. The response time required 
to meet this specification will vary with different situations, so a general response-time 
requirement of ten seconds will be set. Such a response time will be adequate for all 
but the most unusual of situations. 

6. Modes 

When vessels are operating in international or inland w’aters, as specified in 
CG-169, they must use international or inland rules respectively. Accordingly, this 
expert system provides separate modes of operation for international and inland 
situations. The user will choose the appropriate mode at the beginning of a session and 
that mode will remain in effect for entire session. 

C. PROBLEM DECOMPOSITION 

1. Basic Expert System Structure 

A typical rule-based expert system consists of a rule base, an inference engine, 
and a user interface. This basic structure will be followed in this thesis. Each of the 
three main parts of the expert system will be broken into lower-level routines by 
decomposing the task into separate subtasks. 

2. Rule Base Design and Implementation 

a. Writing the Rules 

The first step in the design of the rule base is wTiting two sets of rules, one 
for international waters and the other for inland w'aters. Due to differences in the 
methods of navigating in international waters and inland waters, and differences in the 
types of regulations that apply to similar situations, the combination of facts required 
for writing the two rule sets contains some differences. For international rules, some 
combination of the following facts is required. 

• time of day 

• relative bearing of the other vessel 

• target angle of the other vessel 
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• indication of reduced visibility 

• indication of special status of the other vessel 

• indication of special status of own ship 

Inland rules require some combination of the following facts. 

• time of day 

• type of meeting situation 

• indication of reduced visibility 

• indication of special status of the other vessel 

• indication that other vessel is engaged in special tasking 

For both sets, the majority of the rules were determined by hypothetically 
creating each of the three possible meeting situations then systematically varying the 
combinations of facts described above. When a combination of facts was set, it was 
recorded as the conditional part of that rule. Then CG-169 was referenced to provide 
the conclusion part that was correct for that particular combination of facts. The rules 
that provide the intermediate conclusions were determined from the definitions of 
day shapes and special lighting patterns in CG-169. 

. b. Symbolic Representation 

The tw'o rule sets' that resulted from the process described above, although 
small in comparison to the rule bases found in many expert systems, would require a 
relatively large amount of storage space in a microcomputer. To overcome that 
problem, a symbolic representation was developed by encoding each fact as a single 
character and each conclusion as an integer value. Appendix C and Appendix D 
contain samples of IF.. .THEN rules in their coded and decoded formats. The* encoded 
format will also increase the speed at which the inference engine is able to search the 
rule base, because the comparison of the short character strings is faster than the 
comparison of entire sentences of fact descriptions. 

c. Data Structure 

Because the tw'o rule sets developed above are of fixed sizes that will not 
change during execution of the program, an array of records was chosen as the data 
structure for the rules. Each record in the array consists of one field for the encoded 
string of conditions and one field for the encoded conclusion. 

d. Partitioning 

Separate arrays are used for storing the two rule sets. This partitioning of 
the rules increases the speed of the searching process that occurs each time the 
inference engine searches for a match to the fact base. [Ref 8] 
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e. Implementation 

When the mode, international or inland, is chosen, the appropriate rule set 
is read into an array from a text file. One of two routines, BUILD_RULES for 
international rules or BU1LD_RULES2 for inland, is called to build the rule base. 
Appendix C shows the international rules in encoded and decoded form, and Appendix 
D shows the same for the inland rules. 

3. User Interface Design and Implementation 

a. Basic Design 

The user interface performs the critical tasks of receiving input from the 

user, creating a fact array, and providing output to the user as dictated by the inference 

engine. Numbered selections of facts in the form of large menus allow users to input 

multiple selections with a single entr^^ This will help to reduce the time required for 

user interface. Individual requests for data can be made to the user as additional facts 

% 

are required by the system. The facts entered by the user will be encoded in the same 
format as the conditional part of the rules in the rule base, so that the inference engine 
will be able to compare the fact base to the rules. Output is generated from the 
program in the form of facts from the conditional part -and conclusions from the 
conclusion part. Both of these rule parts are decoded and displayed in a format that 
presents the conclusion as a recommendation and the conditions as a list of facts that 
describe the situation as input by the user. 

b. User Input Implementation 

When the program is executed, the user is prompted for a mode selection, 
either inland or international. The selected mode will remain in effect until program 
execution is halted, thus the user will not be required to make a mode selection for 
each new situation in the session. 

Figure 3.1 shows the menu that is displayed when the international mode is 
selected. From this menu, the user enters all facts concerning the meeting situation that 
are currently true by entering the appropriate selection numbers separated by commas. 
For example, an entiy that would be made when sighting a vessel at night would be; 

• 2,18 

International mode requires additional data to completely describe a 
meeting situation. The user is prompted, one question at a time, for the following data: 

• own ship's heading 

• other vessel's heading 

• other vessel's target angle (during daylight hours only) 
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ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST .NUMBERS SHOULD BE SEPARATED 
BY A COMMA. 

EXAMPLE: 2,6,16 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY:RADAR CONTACT. 

4. REDUCED VIS IBILITY : SOUND SIGNAL HEARD FWD OF BEAM. 

5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. 

6. RED OVER GREEN. 9. RED OVER WHITE. 

7. RED OVER RED. 10. GREEN OVER V/HITE. 

8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED. 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. 

12. TWO BLACK BALLS. 14. DOUBLE CONES. 

13. BALL DIAMOND BALL. 15. CYLINDER. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED. 

16. PORT AND STBD RUNNING , MASTHEAD , RANGE . 

17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBD RUNNING, MASTHEAD, RANGE. 

19. STERN. 



Figure S.l International Menu. 

Figure 3.2 shows the two menus that are displayed in the inland mode. 
Two menus were necessary- because my microcomputer terminal cannot display all of 
the inland facts on one screen. The selections are made as in the international mode. 
Selections from the first menu are combined with any selections from the second menu 
and displayed as one string to show the user the entire entry. All data necessary for 
inland mode operation is provided by these two menus, 
c. Encoding Implementation 

The string of input selection numbers separated by commas is parsed into 
individual numbers. Each number is passed to a CASE statement that maps the 
number to a code character, then adds the code to the fact base, called FACT_F1G in 
the program. 

The same CASE statement simutaneously builds a second code string 
named M1D_RULE. This string is used in semantics checking which will be discussed 
later. 
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ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COMMA. EXAMPLE; 2,6 . A SECOND MENU WILL DISPLAY ADDITIONAL 
CONDITIONS WHEN THE ENTER KEY IS PRESSED. 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY; FOG SIGNAL HEARD FWD OF BEAM. 

4. CONTACT IS A SAILING VESSEL UNDER SAIL. 

ONE OF THE FOLLOWING MEETING SITUATIONS EXISTS; 

5. CONTACT CROSSING FROM PORT TO STBD. 

6. CONTACT CROSSING FROM STBD TO PORT. 

7. MEETING CONTACT HEAD TO HEAD. 

8. OVERTAKING CONTACT. 9. BEING OVERTAKEN BY CONTACT. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED; 

10. PORT AND STBD RUNNING , MASTHEAD , RANGE . 

11. PORT RUNNING, MASTHEAD, RANGE. 

12. STBD RUNNING, MASTHEAD, RANGE. 

13. STERN. 

CONTINUE NUMBER SELECTION WITH THE CONDITIONS BELOW. ONLY ONE 
SELECTION WILL NORMALLY BE MADE FROM THIS MENU, SO NO COMMAS 
SHOULD BE NEEDED. EXAMPLE: 17 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED; 

14. BASKET. 19. ONE BLACK BALL. 

15. TWCi ORANGE S WHITE VERTICALLY STRIPED BALLS. 

16. DIAMOND, TOP HALF BLACK S WHITE STRIPED , LOWER HALF SOLID RED. 

17. BLACK S WHITE STRIPED BALL OVER SOLID RED BALL. 

10. TWO BLACK BALLS. 

ONE OF THE FOLLOWItJG SPECIAL LIGHTING PATTERNS; 

20. RED OVER WHITE. 26. RED OVER RED. 

21. WHITE OVER RED OVER RED OVER WHITE. 

22. WHITE OVER RED OVER RED. 

23. WHITE OVER RED OVER RED OVER RED OVER RED. 

24. RED OVER RED OVER RED. 

25. ONE WHITE FWD AND ONE WHITE AFT. 



Figure 3.2 Inland Menu. 

The additional data that is entered separately in the international mode is 
encoded in a diOcrent manner. This data is used to calculate the target angle and 
relative bearing of an approaching vessel which are in turn used to determine the 
meeting situation that exists between the two vessels. Although the target angle and 
relative bearing can each have three hundred sixty diOcrent values, the manner in 
which the three possible meeting situations are defined by CG-169 simplifies encoding 
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of the values. The three hundred sixty possible values can be divided into four sectors 
as shown in Figure 3.3. A vessel approaching in sectors A or B indicates a crossing 
situation, in sector C a head-to-head situation, and in sector D an overtaking situation. 
Both target angle and relative bearing values are encoded by assigning code characters 
that correspond to the sectors. These additional characters are also added to 
FACT_FIG. 

When navigating in inland waters, the meeting situation can be easily 
determined visually in normal visibility conditions, because navigation is conducted 
within marked shipping channels. This means that the additional data required for the 
international mode is not needed in the inland mode. For restricted visibility 
conditions, no inland rule exists to cover situations where an approaching vessel is 
being tracked on radar only, so the additional data is not used then. 

d. Progi‘am~Output Implementation 

When the inference engine finds a rule that matches the fact base, it passes 
the encoded conclusion to a CASE statement which decodes and displays it. The 
conditional part of the matched rule is passed to a different CASE statement which 
decodes it and displays it with the conclusion to allow the user to see the conclusion 
together with the facts that were used to arrive at the conclusion. 

4. Error Checking 

Error checking includes syntax, semantics, and range checking. Selection- 
number strings entered from the menus are checked for proper format, which is a string 
of numbers separated by commas. Each individual selection number is range-checked 
to ensure that it is a member of the set of possible selections. The entire group of 
selection numbers is checked for duplication of selections. Separate rountines, CHECK 
for international mode and CHECK2 for inland mode, check for two selections from 
certain groupings of selections. Normally only one selection will be true from each of 
these groupings. An example of such an error would be the selection of two standard 
lighting configurations from the grouping shown in Figure 3.4 . A vessel normally 
displays only one standard lighting configuration. 

The compass-bearing data that is entered in the international mode is range- 
checked to ensure that the bearing is within the compass-bearing range of 000 to 359 
degrees. The target angle bearings entered by the user are compared to those 
calculated by the program to ensure there is not a difference between the bearings that 
is significant enough to affect the determination of the correct meeting situation. 
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ONE OF THE FOLLOWING STANDARO LIGHTING PATTERNS IS OBSERVED. 

16. PORT AND STBD RUNNING , MASTHEAD , RANGE . 

17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBO RUNNING, MASTHEAD, RANGE. 

19. STERN. 



Figure 3.4 Standard Lighting Configuration Grouping. 

If one of the errors described above is detected, an error message is displayed 
to the user indicating the type of error, then the program returns to the point where 
the erroneous data was entered and allows the data to be re-entered. 

Semantics checking is performed by the inference engine. The fact string 
MID_RULE is passed to 1NFER_ENG and compared to the rule base. In addition to 
the normal rules, both rule bases contain rules with conditional parts that describe 
situations which do not normally occur. If MID_RULE matches one of these special 
semantics rules, the fact base entered by the user is not semantically correct. Examples 
of such errors are: 

• observing any type of lights between sunrise and sunset 

• observing dayshapes between sunset and sunrise 

• selection of both time periods in one situation 

If such an error is detected, an error message is displayed that explains which selections 
are incompatible and why they do not normally occur together. The program will then 
return the user to the opening menu and allow the data to be re-entered. 

5. Inference Engine Design and Implementation 
a. Basic Design 

The inference engine will systematically cycle through the rule base 
comparing the fact base to the rules until a match is found, if one e.xists. If no match 
exists, this is an indication that no risk of collision exists. 

Since each situation represented in the rule base has only one possible 
conclusion, no two rules have identical conditonal parts. This means that the inference 
engine must only search the rule base until all matches, intermediate and final, are 
found. This will prevent needless waste of time spent searching the rule base when a 
match has already been found. 
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b. Secondary Tasks 

The inference engine will also perform two secondary tasks. The first 
consists of the interpretation of observed special lighting configurations and dayshapes 
which are indications that the approaching vessel has a special status. This is 
accomplished by matching a rule which has as its conditional part the lighting 
configuration or dayshape and has as its conclusion part the corresponding 
interpretation. This task is performed when a fact concerning dayshapes or special 
lighting patterns is entered. The second task consists of checking the user input for 
semantics errors. The semantics error is detected by matching a rule which has a 
conclusion part that states why the collection of facts in the conditional part are not 
compatible. This task is performed after all of the facts have been entered. 

c. Implementation 

The routine INFER_ENG performs the tasks describes above. It steps 
sequentially through the rule base array by comparing the fact base to the conditional 
part of each rule until it finds a match or reaches the end of the array without finding a 
match. The comparison is accomplished by nested FOR loops that sequentially 
compare each code character in the fact base to all of the code characters in the rule 
individually. This process provides the flexibility of order independence for the fact 
base. The order independence means that the selection numbers can be entered in any 
order. 



D. PROGRAM HIERARCHY 

Figure 3.5 shows the hierarchy of routines under the main program as 
implemented in this thesis. The source code listing for the program is contained in 
Appendix A. Sample sessions of operation in both modes are contained in Appendix B. 
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Figure 3.5 Program Hierarchy. 
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IV. TESTING 



A. RESPONSE TIME 

One of the main requirements of this expert system is the ability to provide 
recommendations in timely manner. When the correct maneuvering decision can be 
made and executed early in a meeting situation, the risk of collision is significantly 
reduced. To test the response time of this system, fifty test cases were selected. These 
cases covered a wide range of complexity. At the lower end of the complexity scale was 
a case that required only two facts to describe the situation. At the upper end of the 
scale was a case that required the maximum six facts for its description. The 
complexity of the remaining cases ranged between the two described above. Included 
were cases that had no match in the rule base which required a search of the entire rule 
base. The cases were divided evenly between the international and inland modes. 
Response times ranged from 0.4 to 1.12 seconds with an average response time of 0.73 
seconds. The -system is clearly able to provide correct recommendations within a 
satisfactory' response time. 

B. ACCURACY 

It is essential to the operation of this expert system that the meeting type is 
correctly identified. If the wrong meeting type is calculated by the program, the 
system's recommendation to the Officer of the Deck could possibly be incorrect for the 
actual situation. The condition that would most probably result in an incorrect 
calculation occurs when the relative bearing of an approaching vessel is very near the 
sector boundaries that were described in Figure 3.3. Test cases were selected with 
relative bearings one degree on each side of the sector boundaries to ensure that the 
program could correctly determine the meeting situation. 
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V. SUMMARY 



A. SUCCESSES 

The successful implementation of the encoded regulations demonstrated that the 
answer to the first research question of this thesis is "yes", the regulations in CG-169 
can be expressed in a symbolic form that udll allow them to be used as a rule base. As 
discussed in Chapter III and demonstrated in Appendix A, use of the expert system 
implemented in this thesis is quite simple. The only prior knowledge of the system 
required is the activation of the program by typing the program name at the computer 
keyboard. The menu-driven format reduces user input requirements and assumes only a 
limited knowledge of CG-169 and nautical terminology. This means the system can be 
quickly integrated into the bridge-watch routine. The response times discussed in 
Chapter IV show that this expert system can provide prompt recommendations for 
even the most complicated situations involving risk of collision. And. as discussed in 
Chapter III, all recommendations provided by this expert system are taken directly 
from CG-169, and thus are correct for the situation that is entered into the system. 
Therefore, the answer to the second research question is "yes", the expert system 
implemented in this thesis provides prompt, correct recommendations to the Officer of 
the Deck in a user-friendly manner. 

By . automating the manual procedure of looking into CG-169 for the 
interpretation of situations that involve risk of collision, this expert system could 
certainly help to reduce the time required of the Officer of the Deck to make a correct 
maneuvering decision and reduces the probability of error in making the correct 
decision. Removing the manual "look-up" procedure also frees the Officer of the Deck 
to more closely monitor the operation of the bridge watch team during the critical 
function of preventing collisions at sea. 

The robust nature of this expert system combined with the explanatory error- 
response messages create an excellent teaching tool for Officer of the Deck trainees. 
Pre-written sessions could be constructed to provide training for various situations that 
involve risk of collision. This training function could be used by bridge watch teams 
while underway or as part of inport Officer of the Deck training. 
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Implementation of this expert system for shipboard use would be relatively 
inexpensive in terms of cost and quite flexible in terms of hardware selection. The 
compiled program in a .COM file and additional rule base files require only thirty-six 
kilobytes of memory, therefore almost any small microcomputer could run the 
program. The program is written in Turbo Pascal which is available for both CP, M 
and DOS operating systems, providing a very wide market of microcomputers from 
w’hich to choose. With the increased presence of microcomputers onboard Naval 
ships, the system could even be implemented with existing computer resources. 

Some Officers of the Deck do rely on their memorization of CG-169 for making 
maneuvering decisions, but this practice is not commonly supported by commanding 
officers. Since output from this system is derived directly from CG-169, 
recommendations from this system can serve to low’er the probability of error that 
exists when an Officer of the Deck relies too heavily on his or her memorization of 
CG-169. Although this probability is not significant as it exists now’, this system might 
help to prevent a disaster that could result from the infrequent error. 

B. LIMITATIONS 

Although this expert system can provide prompt, correct recommendations, it is 
not a real-time system, and thus it view’s eveiy’ situation w’ith no sense of timing. A 
certain risk of collision situation may require tw’enty-five minutes for the actual closest 
point of approach between the vessels to occur due to a slow closure rate. However, 
the same situation might require only ten minutes to reach the closest point of 
approach if the closure rate is very fast. Although there w’ould be no difference 
between the recommendations given in the tw’o cases above, it w’ould be an added 
advantage if the recommendation could also take into consideration the specific time 
related issues involved in making a maneuvering decision. 

To effect the extension of this system to provide real-time recommendations, a 
s\'stem clock would be required in the computer system being used, and modifications 
to the actual expert system program w’ould be required to allow the input of changes in 
the bearing and range of the other vessel. The extension of this expert system to 
become a real-time system could enhance its value to the Officer of the Deck. 

The recommendations provided by this expert system are of a ver\’ general 
nature, and must be recognized as such. This system does not consider the tactical 
situation, other shipping in the vicinity that is not involved in the current meeting 
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situation, or concern for navigational hazards that could be present. System users must 
take into consideration these other factors before making a final decision. 

Although the time required for data entry into this system is short, it does require 
the user to shift their attention from the actions of the approaching vessel. To shorten 
the data-entry time even more, a direct data entry from the radar equipment could be 
used. However, visually aquired data, such as observation of dayshapes and lighting 
patterns, would require manual entry. 



APPENDIX A 

SOURCE CODE LISTING 



PROGRAM RDRULES^ 



CONST 

MAX_INTL_RULE = 157 j 
MAX_INLD_RULE = 105 j 

TYPE 

INPUT.STR = STRINGCialj 
C0DE_INT = 0..30J 
SHRT_STR = STRINGC3U 
RULE_STR = STRINGClOlj 
RULE_REC = RECORD 

CONL:CODE_INTj 

RULE_FIG:RULE_STR 

END; 

INTL_RULE_ARRAY = ARRAYC 1 . .MAX_INTL.RULE ] OF RULE.REC; 
INLD_RULE_ARRAY = ARRAYC 1 . ..MAX^INLD.RULE 1 OF RULE.REC; 
SHORT_INT = 1..2; 

SELECT_ARRAY = ARRAYC1..71 OF INTEGER; 



VAR 

SETTING , LTGCODE , TIME , FOG , FOG2 , DSHAPE , SPEC.LTS , RUN_LTS , 
MID_SIZE ,MAX_FAX ,TIME1 ,TIME2 : CODE_INT ; 

MI D_RULE , FACT_FIG : RULE_STR ; 

INTL.RULES : INTL_RULE_ARRAY ; 

INLD.RULES : INLU_RULE_ARRAY ; 

FILE VAR: TEXT; 

RULE_SET , LOH^VIS : SHORT.INT ; 

GOOD ,FOG_SIG_CONTACT , CONTINUE , FOUND ,QUIT : BOOLEAN ; 
ANSzCHAR; 

CONTACT_TRUE.BRG : SHRT.STR ; 



PROCEDURE MAP_CONL( CODE : CODE.INT ) ; 

BEGIN 

CASE CODE OF 

1:WRITELN(' YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED.*); 

2: BEGIN 

WRITELN( * CONTACT HAS SPECIAL STATUS. YOU ARE GIVE-WAY VESSEL.'); 
WRITELNl * MANEUVER TO AVOID CONTACT. TURN STBD IF POSSIBLE.*); 

IF (TIME = 1) THEN 

WRITELNt * SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN.*) 

ELSE 

WRITELNt ' SHOW ONE LIGHT FLASH TO SIGNAL A STBD TURN.') 

END; 

3: BEGIN 

WRITELN( * YOU ARE GIVE-WAY VESSEL. MANEUVER TO AVOID CONTACT.*); 
WRITELNl* TURN STBD IF POSSIBLE.*); 

IF (RULE_SET = 1) THEN 
IF (TIME = 1) THEN 

WRITELN( * SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN.*) 

ELSE 

WRITELNl* SHOW ONE LIGHT FLASH TO SIGNAL A STBD TURN.*) 

END; 

4: BEGIN 

WRITELNl* OWN SHIP HAS SPECIAL STATUS. YOU ARE STAND-ON VESSEL.*); 
WRITELNl* MAINTAIN COURSE AND SPEED.') 

END; 

5: BEGIN 
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HRITELN( ' BOTH SHIPS MUST GIVE WAY. ALTER COURSE TO STBD TO' 

WRITELN( • AVOID CONTACT. ' 

IF (TIME = 1) THEN 

WRITELN( ' SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN.' ) 

ELSE 

WRITELN( ' SHOW ONE LIGHT FLASH TO SIGNAL A STBD TURN.'} 

END( 

6: BEGIN 

FACT^FIG ;= FACT_FIG + 'z'> 

MAX^FAX := MAX^FAX + 1 
END^ 

7:BEGIN 

WRITELN} 

WRITELNC ' REDUCE SPEED TO BARE STEERAGE -WAY . PROCEED WITH EXTREME')} 
WRITELNC ' CAUTION UNTIL THE DANGER OF COLLISION IS OVER.' )} 

WRITELN} 

END} 

8: BEGIN 

CONTINUE := FALSE} 

WRITELN} 

WRITELN( 'SEMANTIC ERROR. ' )} 

WRITELN( 'SELECTIONS ',TIME,' AND SSPEC^LTS,' ARE NOT COMPATIBLE.')} 
WRITELNt 'LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE.')} 
WRITELN( 'RE-ENTER SELECTION NUMBERS. ' )} 

WRITELN 

END} 

9 .-BEGIN 

CONTINUE := FALSE} 

WRITELN} 

WRITELN( 'SEMANTIC ERROR. ' )} 

WRITELN! 'SELECTIONS ' ,TIME , ' AND ',RUN_LTS,' ARE NOT COMPATIBLE.')} 
WRITELN! 'LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE.')} 
WRITELN! 'RE-ENTER SELECTION NUMBERS. ' )} 

WRITELN 

END} 

10: BEGIN 

CONTINUE := FALSE} 

WRITELN} 

WRITELN! 'SEMANTIC ERROR. ' )} 

WRITELN! 'SELECTIONS ',TIME,' AND ',SPEC_LTS,' AND ',RUN_LTS)} 
WRITELN! 'ARE NOT COMPATIBLE. LIGHTS OF ANY TYPE ARE NOT NORMALLY')} 
WRITELN! 'DISPLAYED AFTER SUNRISE.')} 

WRITELN! 'RE-ENTER SELECTION NUMBERS.' )} 

WRITELN 

END} 

11 .-BEGIN 

CONTINUE := FALSE} 

WRITELN} 

WRITELN! 'SEMANTIC ERROR. ' )} 

WRITELN! 'SELECTIONS ',TIME,' AND ',DSHAPE,' ARE NOT COMPATIBLE.')} 
WRITELN! 'DAYSHAPES ARE NOT NORMALLY DISPLAYED AFTER SUNSET.')} 
WRITELN! 'RE-ENTER SELECTION NUMBERS.')} 

WRITELN 

END} 

12:BEGIN 

CONTINUE := FALSE} 

WRITELN} 

WRITELN! 'SEMANTIC ERROR. ' )} 

WRITE! 'SELECTIONS ' ,DSHAPE)} 

IF !LOW_VIS = 2) THEN 

WRITELN!' AND ',FOG,' ARE NOT COMPATIBLE.') 

ELSE 

WRITELN!' AND ',FOG2,' ARE NOT COMPATIBLE.')} 

WRITELN! 'DAYSHAPES CAN NOT NORMALLY BE SEEN DURING REDUCED')} 
WRITELN! 'VISIBILITY CONDITIONS. ' )} 

WRITELN! 'RE-ENTER SELECTION NUMBERS.')} 

WRITELN 

END} 

15: BEGIN 
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CONTINUE := FALSER 
WRITELNJ 

WRITE LN( 'SEMANTIC ERROR. * 

WRITE ( 'SELECTIONS ',SPEC_LTS)> 

IF (LOW_VIS = 2) THEN 

WRITELNt ' AND ',FOG>' ARE NOT COMPATIBLE.') 

ELSE 

WRITELNt' AND ',FOG2,' ARE NOT COMPATIBLE .') > 

WRITELNt 'LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED' )> 
WRITELNt 'VISIBILITY CONDITIONS. ' )> 

WRITELNt 'RE-ENTER SELECTION NUMBERS. ')> 

WRITELN 
ENDj 
1^: BEGIN 

CONTINUE := FALSE J 
WRITELNt 

WRITELNt 'SEMANTIC ERROR. ' )^ 

WRITE t 'SELECTIONS ',RUN_LTS)J 
IF tLOW^VIS = 2) THEN 

WRITELNt' AND ',FOG,' ARE NOT COMPATIBLE,') 

ELSE 

WRITELNt' AND ',FOG2,' ARE NOT COMPATIBLE .') > 

WRITELNt 'LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED' )> 
WRITELNt 'VISIBILITY CONDITIONS. ' ) J 
WRITELNt ’RE-ENTER SELECTION NUMBERS . ’ )\ 

WRITELN 

ENDj 

15: BEGIN 

CONTINUE := FALSER 
WRITELNt 

WRITELNt 'SEMANTIC ERROR . ' )\ 

WRITEt 'SELECTIONS ',RUN_LTS,' AND ',SP£C.LTS)> 

IF tLOW.VIS = 2) THEN 

WRITELNt' AND ',FOG,' ARE NOT COMPATIBLE.') 

ELSE 

WRITELNt' AND ',FOG2,' ARE NOT COMPATIBLE .') J 
WRITELNt 'LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED' )> 
WRITELNt 'VISIBILITY CONDITIONS. ' )\ 

WRITELNt 'RE-ENTER SELECTION NUMBERS . ' )\ 

WRITELN 
ENDj 
16: BEGIN 

CONTINUE := FALSER 
WRITELNt 

WRITELNt 'SEMANTIC ERROR. ' )j 

WRITELNt 'SELECTION ',TIME2,' REQUIRES ANOTHER SELECTION SUCH AS A')j 
WRITELNt 'LIGHTING PATTERN OR REDUCED VISIBILITY CONDITION BEFORE THE ' ) J 
WRITELNt 'SITUATION CAN BE ANALYZED. ' 

WRITELNt 'RE-ENTER SELECTION NUMBERS. ' )> 

WRITELN 
ENDj 
17 -.BEGIN 

CONTINUE := FALSE j 
WRITELN > 

WRITELNt 'SEMANTIC ERROR. ' )j 

WRITELNt 'SELECTION ',SPEC_LTS,' ALSO REQUIRES A STANDARD ') J 
WRITELNt 'LIGHTING PATTERN. SPECIAL LIGHTING PATTERNS ARE NOT ' ) j 
WRITELNt 'NORMALLY DISPLAYED WITHOUT A STANDARD LIGHTING PATTERN. ')j 
WRITELNt 'RE-ENTER SELECTION NUtiBERS.')^ 

WRITELN 

END^ 

18: BEGIN 

CONTINUE := FALSE > 

WRITELN^ 

WRITELNt 'SEMANTIC ERROR. ' )> 

WRITELNt 'SELECTIONS ',FOG,' AND ',FOG2>' ARE NOT COMPATIBLE .') J 
WRITELNt 'RE-ENTER SELECTION NUMBERS. ' )j 
WRITELN 
END( 
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19:BEGIN 

CONTINUE 
WRITE LNj 
WRITE LN( 
WRITELN( 
WRITELN( 
WRITE LN( 
WRITELN 
END) 

20: BEGIN 

CONTINUE 

WRITELN) 

WRITELNt 

WRITELNt 

WRITELN( 

WRITELNt 

WRITELNt 

WRITELN 

END) 

21:BEGIN 

CONTINUE 

WRITELN) 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELN 

END) 

22: BEGIN 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

END) 

23: BEGIN 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

END) 

2^: BEGIN 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

END) 

25: BEGIN 

WRITELNt 

WRITELNt 

END) 

26: BEGIN 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

END) 

27:BEGIN 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 

WRITELNt 



:= FALSE) 

•SEMANTIC ERROR.')) 

•SELECTIONS ',TIME1,' AND ',TIME2,' ARE NOT COMPATIBLE.')) 
•THE TWO POSSIBLE TIME-PERIODS CAN NOT OCCUR TOGETHER.')) 
•RE-ENTER SELECTION NUMBERS.')) 



:= FALSE) 

•SEMANTIC ERROR.')) 

•SELECTIONS ',DSHAPE,' AND '>RUN_LTS,' AND ',F0G2)) 

•ARE NOT COMPATIBLE. LIGHTS OR DAYSHAPES CAN NOT')) 
•NORMALLY BE SEEN DURING REDUCED VISIBILITY CONDITIONS.')) 
•RE-ENTER SELECTION NUMBERS.')) 



: = FALSE ) 

•SEMANTIC ERROR.')) 

•SELECTIONS ',DSHAPE,' AND ',F0G2,' AND ',SPEC_LTS,' AND')) 
•RUN_LTS ARE NOT COMPATIBLE. LIGHTS OR DAYSHAPES CAN NOT')) 
•NORMALLY BE SEEN DURING REDUCED VISIBILITY CONDITIONS.')) 
■RE-ENTER SELECTION NUMBERS.')) 



BOTH SHIPS MUST GIVE WAY. GIVE ONE SHORT BLAST TO SIGNAL')) 
YOUR INTENTION TO ALTER COURSE TO STBD OR ANSWER THE ' )) 
CONTACT"S SIGNAL WITH THE SAME SIGNAL. DO NOT ALTER COURSE')) 
UNTIL YOU AND THE CONTACT HAVE MATCHED SIGNALS. ' ) 



YOU ARE GIVE-WAY VESSEL. SOUND ONE SHORT BLAST IF YOU')) 
INTEND TO OVERTAKE ON THE STBD SIDE OR TWO SHORT BLASTS IF')) 
YOU INTEND TO OVERTAKE ON THE PORT SIDE. WAIT FOR ')) 

THE SAME SIGNAL IN AGREEMENT BEFORE OVERTAKING. IF THE')) 
CONTACT ANSWERS WITH THE DANGER SIGNAL, FOUR OR MORE SHORT')) 
BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO OVERTAKE THE')) 
CONTACT.') 



YOU MUST KEEP OUT OF THE WAY OF SAILING VESSELS UNLESS YOU' )) 
ARE CONSTRAINED BY A NARROW CHANNEL. IF YOU ARE CONSTRAINED')) 
AND A CLOSE QUARTER SITUATION IS EMINENT, SOUND THE DANGER')) 
SIGNAL, FOUR OR MORE SHORT BLASTS IN RAPID SUCCESSION.') 



REDUCE SPEED TO ENSURE SAFETY OF BOTH VESSELS. WHEN PASSING')) 
WITHIN 200 FT. OF CONTACT, REDUCE SPEED TO 5 MPH OR LESS.') 



WHEN WITHIN ONE MILE OF CONTACT, INDICATE INTENTION TO PASS')) 
WITH ONE LONG BLAST. CONTACT WILL DIRECT YOU TO PROPER SIDE' )) 
FOR PASSAGE WITH ONE SHORT BLAST FOR A STBD PASSAGE OR TWO ' ) ) 
SHORT BLASTS FOR A PORT PASSAGE. ANSWER WITH SAME SIGNAL TO')) 
ACKNOWLEDGE. IF CONTACT SOUNDS DANGER SIGNAL, FOUR OR MORE')) 
SHORT BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO PASS.')) 
SLOW DOWN OR STOP AND AWAIT FURTHER SIGNAL. ' ) 



YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED.')) 

ANSWER PASSING VESSEL"S INDICATION OF DESIRED SIDE TO PASS')) 
WITH SAME SIGNAL IF IT IS SAFE, BUT ANSWER WITH THE DANGER' )) 
SIGNAL, FOUR OR MORE SHORT BLASTS IN RAPID SUCCESSION, IF ')) 
THERE IS A DANGER. ' ) 
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END) 

28;WRITELN( * MANEUVER TO AVOID A VESSEL AT ANCHOR,*)) 
END END) 



PROCEDURE MAP.TA (VAR (5UADRANT : CHAR ) BEARING; INTEGER ) ) 
BEGIN 

IF (BEARING>=1) AND ( BEARING<=112 ) THEN 
QUADRANT ;= *c* 

ELSE IF (BEARING>=11S) AND ( BEARING<=247) THEN 
QUADRANT := *d* 

ELSE IF (BEARING>=248) AND ( BEARING<=359) THEN 
QUADRANT := *e* 

ELSE 

QUADRANT := *f* END) 



PROCEDURE MAP_RB (VAR QUADRANT : CHAR) BEARING: INTEGER ) ) 
BEGIN 

IF (BEARING>=1) AND ( BEARING<=112 ) THEN 
QUADRANT := *g' 

ELSE IF (BEARING>=m) AND ( BEARING<=2^7 ) THEN 
QUADRANT := 'h* 

ELSE IF (BEARING>=248) AND ( BEARING<=359 ) THEN 
QUADRANT := *i* 

ELSE 

QUADRANT ;= *j* END) 



PROCEDURE CALC_TGT_ANG (VAR TA :SHRT_STR)HTB ,HSH ; SHRT_STR ) ) 
VAR 

CODE ,TA_INT , YTB_INT ,HSH_INT , HTB_INT ; INTEGER ) 

BEGIN 

VA L ( HTB , HTB_INT , CODE ) ) 

VAL ( HSH , HSH.INT , CODE ) ) 

YTBJiNT := HTB_INT-180) 

IF YTB.INT < 0 THEN 

YTB_INT := YTB_INT + 360) 

TA_INT := YTB.INT - HSH^INT) 

IF TA_INT < 0 THEN 

TA^INT ;= TA^INT + 360) 

IF (TA_INT < 100) AND (TA_INT > 9) THEN BEGIN 
STR(TA_INT,TA)) 

TA := '0* + TA) 

END 

ELSE IF (TA^INT >= 0) AND (TA_INT <= 9) THEN BEGIN 
STR(TA_INT,TA)) 

TA ;= *00* + TA) 

END 

ELSE 

STR(TA_INT,TA) END) 



PROCEDURE BUILD_RULES2) 
VAR 

J; INTEGER) 
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BEGIN 

ASSIGN( FI LEVAR, 'YRULES.TXT ' U 
RESET ( FI LEVAR)> 

FOR J := 1 TO MAX_INLD_RULE DO 
WITH INLD_RULES[J] DO BEGIN 
READLN( FILEVAR,RULE_FIG ) i 
READLN( FILEVAR>CONL) 

END) 

CLOSE (FILE VAR) END) 



PROCEDURE BUILD_RULES) 

VAR 

J: INTEGER) 

BEGIN 

ASSIGN( FI LE VAR, 'XRULES.TXT ‘ ) ) 
RESET(FILEVAR)) 

FOR J := 1 TO MAX^INTL^RULE DO 
WITH INTL_RULES[J] DO BEGIN 
READLN( FILEVAR,RULE_FIG)) 
READLN( FILEVAR,CONL) 

END) 

CLOSE ( FI LEVAR) END) 



PROCEDURE NIGHT^ASPECT (VAR FINI : BOOLEAN )BEARING: INTEGER )TA:SHRT,STR ) ) 
TYPE 

STRG = STRING[9l) VAR 
NOT^MATCH: BOOLEAN) 

LGT.QUADiSTRG) 

BEGIN 

NOT.MATCH := FALSE) 

CASE LTGCODE OF 
16: BEGIN 

IF (BEARING = 0) THEN BEGIN 
FINI := TRUE) 

FACT_FIG := FACT_FIG > ) 

MAX.FAX := MAX.FAX + 1) 

END 

ELSE BEGIN 

LGT.QUAD := *000.') 

NOT^MATCH := TRUE) 

END 

END) 

17: BEGIN 

IF(BEARING>=248) AND ( BEARING<=359 ) THEN BEGIN 
FINI := TRUE) 

FACT_FIG := FACT_FIG + 'e' ) 

MAX_FAX := MAX^FAX + 1) 

END 

ELSE BEGIN 

LGT.QUAD := 'PORT FWD.') 

NOT.MATCH := TRUE) 

END 

END) 

18: BEGIN 

IF (BEARING>=1) AND ( BEARING<=112 ) THEN BEGIN 
FINI := TRUE) 

FACT_FIG := FACT^FIG + 'c') 

MAX^FAX := MAX.FAX +1) 

END 

ELSE BEGIN 
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LGT.QUAD := *STBD FWD.'j 
NOT.MATCH := TRUE> 

END 

END( 

19:BEGIN 

IF (BEARING>=113) AND ( BEARING<=247 ) THEN BEGIN 
FINI := TRUE> 

FACT.FIG := FACT.FIG + 

MAX.FAX := MAX_FAX +lj 
END 

ELSE BEGIN 

LGT.QUAD := 'AFT.'j 
NOT.MATCH ;= TRUE 

END^ 

END 

END^ 

IF NOT_MATCH THEN BEGIN 
HRITELNj 

WRITELN( 'PROGRAM-COMPUTED TARGET ANGLE DOES NOT MATCH THE ASPECT* )> 
HRITELN( 'DETERMINED BY LIGHT CONFIGURATION. PROGRAM-COMPUTED TARGET* 
HRITELN( 'ANGLE IS STA,'. TARGET ANGLE INDICATED BY LIGHTING IS')> 
•HRITELN(LGT_QUAD,' RE-CHECK MANEUVERING BOARD SOLUTION AND')> 
WRITELN( 'RUNNING LIGHT CONFIGURATION. ' 

WRITELN> 

END END) 



PROCEDURE CHECK ( INPUT_ARRAY tSELECT.ARRAY )H : INTEGER )VAR OKAY : BOOLEAN ) ) 

VAR 

D,E,P,Q:INTEGER) 

TIME.OK , DUPED ,SAME_GROUPl ,SAME_GROUP2 ,SAME.GROUP3 : BOOLEAN) 

BEGIN 

TIME.OK := FALSE) 

DUPED := FALSE) 

SAME_GROUPl := FALSE) 

SAME.GROUP2 := FALSE) 

SAME.GROUP3 ;= FALSE) 

FOR D := 1 TO H-1 DO 

IF (INPUT.ARRAYIDI = 1 ) OR ( INPUT^ARRAYl D ] = 2) THEN 
TIME_OK := TRUE) 

IF NOT TIME.OK THEN BEGIN 
OKAY:= FALSE) 

HRITELNrNO TIME PERIOD HAS ENTERED. A TIME PERIOD MUST BE ENTERED')) 
WRITELN( 'BEFORE A SITUATION CAN BE ANALYZED.')) 

HRITELN( 'RE-ENTER SELECTION NUMBERS. ' )) 

WRITELN( 'TO CONTINUE, PRESS ANY KEY.')) 

WHILE NOT KEYPRESSED DO 
DELAY(D) 

WRITELN)WRITELN 

END) 

FOR D := 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 

IF (INPUT_ARRAY[D] = INPUT. ARRAYl E 1 ) THEN BEGIN 
OKAY := FALSE) 

P := D) 

DUPED := TRUE 
END) 

IF DUPED THEN BEGIN 

WRITELNC 'SELECTION ' ,INPUT.ARRAY[ P ] , * IS DUPLICATED.')) 

WRITELN( 'RE-ENTER SELECTION NUMBERS.')) 

WRITELN( 'TO CONTINUE, PRESS ANY KEY.')) 

WHILE NOT KEYPRESSED DO 
DELAY(D) 

WRITELN)WRITELN 

END) 

FOR D ;= 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 
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IF ( (INPUT.ARRAYtDl IN 112,13,1^,151) AND ( INPUT_ARRAY[ E 1 IN 
[12,13,l^f,15])) THEN BEGIN 
OKAY := FALSER 
P := Dj 
Q := Ej 

SAME^GROUPl := TRUE 
END( 

IF SAME^GROUPl THEN BEGIN 

WRITE LN( 'SELECTIONS ' ,INPUT_ARRAYC P 1 , ' AND ' ,INPUT_ARRAY[Q 1 , ' CAN NOT ' ) j 
WRITELN( 'BE SELECTED TOGETHER BECAUSE TWO DIFFERENT DAYSHAPES WILL NOT ')j 
WRITELN( 'BE SEEN ON THE SAME SHIP. RE-ENTER SELECTION NUMBERS.'); 

WRITE LN( 'TO CONTINUE, PRESS ANY KEY. ' ); 

WHILE NOT KEYPRESSED DO 
DELAY(l); 

WRITE LN; WRITE LN 
END; 

FOR D := 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 

IF ( (INPUT_ARRAY[Dl IN [6,7,8,9,10,111) AND ( INPUT_ARRAY[ E 1 IN 
16,7,8,9,10,111)) THEN BEGIN 
OKAY := FALSE; 

P := D; 

Q := E; 

SAME.GR0UP2 ;= TRUE 
END; 

IF SAME_GR0UP2 THEN BEGIN 

WRITE LN( 'SELECTIONS ' ,INPUT_ARRAY[ P 1 , ' AND ' ,INPUT_ARRAYCQ 1 , ' CANNOT'); 
WRITELNt 'BE SELECTED TOGETHER BECAUSE TWO DIFFERENT SPECIAL LIGHTING'); 
WRITELNt 'PATTERNS WILL NOT BE SEEN ON THE SAME SHIP. RE-ENTER SELECTION'); 
WRITELN( 'NUMBERS. ' ); 

WRITELNC 'TO CONTINUE, PRESS ANY KEY.'); 

WHILE NOT KEYPRESSED DO 
DELAY(l); 

WRITELN;WRITELN 

END; 

FOR D := 1 TO H-2 DO • 

FOR E ;= D+1 TO H-1 DO 

IF ( (INPUT^ARRAYtDl IN C 16 ,17,18,19 1 ) AND ( INPUT.ARRAYl E 1 IN 
116,17,18,191)) THEN BEGIN 
OKAY := FALSE; 

P := D; 

Q := E; 

SAME_GR0UP3 := TRUE 
END; 

IF SAME.GR0UP3 THEN BEGIN 

WRITELNC 'SELECTIONS ', INPUT. ARRAYt P 1 , ' AND ' , INPUT.ARRAY [ Q 1 , ' CANNOT'); 
WRITELN( 'BE SELECTED TOGETHER BECAUSE TWO DIFFERENT STANDARD LIGHTING'); 
WRITELNC 'PATTERNS WILL NOT BE SEEN ON THE SAME SHIP. RE-ENTER SELECTION' ); 
WRITE LN( 'NUMBERS. ' ); 

WRITELN( 'TO CONTINUE, PRESS ANY KEY.'); 

WHILE NOT KEYPRESSED DO 
DELAY(l); 

WRITELN;WRITELN; 

END END; 



PROCEDURE PRINT.MENU2(VAR LONGCODE : INPUT.STR ) ; 
VAR 

FIRSTCODE ,SNDCODE : RULE.STR ; 

LEN,G:INTEGER; 



BEGIN 

WRITELNt 

WRITELNt 

WRITELNC 

WRITELNC 

WRITELN( 

WRITELNt 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING'); 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED'); 

BY A COMMA. EXAMPLE: 2,6 . A SECOND MENU WILL DISPLAY ADDITIONAL'); 
CONDITIONS WHEN THE ENTER KEY IS PRESSED.'); 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET.'); 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE.'); 
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WRITELNC • 3. REDUCED VISIBILITY ; FOG SIGNAL HEARD FWD OF BEAM.*)> 

WRITELN( • CONTACT IS A SAILING VESSEL UNDER SAIL.' 

WRITELNCONE OF THE FOLLOHING MEETING SITUATIONS EXISTS; 

WRITELN( * 5. CONTACT CROSSING FROM PORT TO STBD. ' )> 

WRITELN( * 6. CONTACT CROSSING FROM STBD TO PORT.')> 

HRITELN( • 7. MEETING CONTACT HEAD TO HEAD.')> 

WRITE LN( • 8. OVERTAKING CONTACT. 9. BEING OVERTAKEN BY CONTACT. ')> 

WRITELN( 'ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED: ')j 



WRITELNt * 


10. 


PORT 


AND STBD RUNNING, MASTHEAD, RANGE. ' )> 


WRITELNt * 


11. 


PORT 


RUNNING, MASTHE AD , RANGE . 


' )> 


WRITELNt ' 


12. 


STBD 


RUNNING , MASTHEAD , RANGE . 


* 


WRITELNt ' 


13. 


STERN. ' )jWRITELN^ 





READLN( FIRSTCODE)j 
WRITELN(FIRSTCODE)> 

LEN ;= LENGTH(FIRSTCODE)> 

FOR G ;= 1 TO LEN DO 

WHILE (FIRSTCODEtG] = ' ' ) AND ( LENGTH ( FI RSTCODE ) >= 1 ) DO 
DELETE( FIRSTCODE,G,l) j 
LEN := LENGTH(FIRSTCODE)> 

IF (FIRSTCODEtLENl <> THEN 

FIRSTCODE ;= FIRSTCODE ♦ 

CLRSCRJ 

WRITELN( 'CONTINUE NUMBER SELECTION WITH THE CONDITIONS BELOW. ONLY ONE')j 
WRITELNt 'SELECTION WILL NORMALLY BE MADE FROM THIS MENU, SO NO COMMAS' 

WRITELN( 'SHOULD BE NEEDED. EXAMPLE; 17 ' )>WRITELNj 
WRITELNt 'ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED; ')> 

WRITELNt' 14. BASKET. 19. ONE BLACK BALL.')J 

WRITELNt' 15. TWO ORANGE & WHITE VERTICALLY STRIPED BALLS. 

WRITELNt* 16. DIAMOND, TOP HALF BLACK S WHITE STRIPED , LOWER HALF SOLID RED.'lj 
WRITELNt' 17. BLACK & WHITE STRIPED BALL OVER SOLID RED BALL.'lj 
WRITELNt' 18. TWO BLACK BALLS. ')> 

WRITELNt 'ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS: ')J 
WRITELNt' 20. RED OVER WHITE. 26. RED OVER RED.'lJ 

WRITELNt' 21. WHITE OVER RED OVER RED OVER WHITE. *)j 

WRITELNt* 22. WHITE OVER RED OVER RED. ' )j 

WRITELNt* 23. WHITE OVER RED OVER RED OVER RED OVER RED.')j 

WRITELNt* 24. RED OVER RED OVER RED.'lj 
WRITELNt* 25. ONE WHITE FWD AND ONE WHITE AFT.')> 

READLNtSNDCODE)> 

WRITELNt SNDCODElj 

LONGCODE ;= FIRSTCODE ♦ SNDCODE > 

LEN ;= LENGTH t LONGCODE 
FOR G ;= 1 TO LEN DO 

WHILE tLONGCODEtGl = * * ) AND t LENGTH t LONGCODE ) >= 1 ) DO 
DELETEt LONGCODE, G,1)J 
LEN ;= LENGTH t LONGCODE )> 

IF t LONGCODE [LEN] = ',') THEN 
DELETE t LONGCODE , LEN , 1 ) J 

WRITELNt 'THE COMPLETE SELECTION FOR THIS INLAND SITUATION IS ', LONGCODE END > 



PROCEDURE PRINT_MENU> 

BEGIN 

WRITELNt 'ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING* 
WRITELNt 'CONDITIONS THAT CURRENTLY EXIST .NUMBERS SHOULD BE SEPARATED' 
WRITELNt 'BY A COMMA. * 

WRITELNt 'EXAMPLE: 2,6,16 ')j 

WRITELNt* 1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. ')j 
WRITELNt* 2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. *)j 
WRITELNt* 3. REDUCED VISIBILITY ; RADAR CONTACT. ' 

WRITELNt* 4. REDUCED VISIBILITY: SOUND SIGNAL HEARD FWD OF BEAM.'lj 
WRITELNt * 5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. ')> 

WRITELNt 'ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. *)> 
WRITELNt* 6. RED OVER GREEN. 9. RED OVER WHITE J 

WRITELNt* 7. RED OVER RED. 10. GREEN OVER WHITE .') J 

WRITELNt ■ 8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED.'lj 

WRITELNt 'ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. ')i 
WRITELNt* 12. TWO BLACK BALLS. 14. DOUBLE CONES. ')j 
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WRITE LN( * 13. BALL DIAMOND BALL. 15. CYLINDER. ')> 

WRITELNt *ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED. *)> 
WRITELNt • 16. PORT AND STBD RUNNING , MASTHEAD , RANGE .*) j 
WRITELNt * 17. PORT RUNNING, MASTHE AD , RANGE j 
WRITELN( * 18. STBD RUNNING, MASTHEAD, RANGE .*) > 

WRITELNl • 19. STERN.*) END> 



PROCEDURE MAP.INLAND ( CODE : INTEGER j VAR SHORT.RULE ; RULE.STR ) > 



BEGIN 

CASE CODE OF 
1: BEGIN 

MID_RULE ;= MID_RULE + *«)*> 

MID_SIZE ;= MID_SIZE + U 

TIME := 

TIMEl := Is 

FACT_FIG ;= FACT_FIG + *a*s 
MAX^FAX ;= MAX.FAX + 1 
ENDS 
2; BEGIN 

MID.RULE := MID_RULE + * *S 

MID_SIZE := MID.SIZE + Is 

TIME := 2s 
TIME2 := 2s 

FACT_FIG := FACT_FIG + *b*s 
MAX_FAX := MAX.FAX + 1 
ENDS 
3: BEGIN 

FOG2 := CODES 
FOG.SIG.CONTACT := TRUE s 
FACT_FIG := FACT_FIG + *^t*s 
MAX.FAX ;= MAX.FAX + Is 
MID.RULE := MID.RULE + *s*S 
MID.SIZE := MID.SIZE + 1 
ENDS 
BEGIN 

MID_RULE := MID_RULE + *A*S 
MID_SIZE := MID_SIZE + Is 
FACT_FIG ;= FACT_FIG + *A*S 
MAX_FAX ;= MAX.FAX + 1 
ENDS 
5: BEGIN 

FACT.FIG := FACT_FIG + *B*s 
MAX_FAX ;= MAX^FAX + 1 
ENDS 
6: BEGIN 

FACT.FIG := FACT_FIG + *C*S 
MAX^FAX := MAX^FAX + 1 
ENDS 
7; BEGIN 

FACT.FIG ;= FACT_FIG + *D*s 
MAX.FAX ;= MAX_FAX + 1 
ENDS 
8: BEGIN 

FACT_FIG := FACT_FIG + *E*s 
MAX_FAX := MAX^FAX + 1 
ENDS 
9: BEGIN 

FACT_FIG ;= FACT_FIG + *F*s 
MAX_FAX := MAX_FAX + 1 
ENDS 
10 .-BEGIN 

FACT_FIG := FACT_FIG + *G*s 
MAX_FAX := MAX_FAX + 1 
ENDS 
11:BEGIN 

FACT^FIG ;= FACT.FIG + *H*s 
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MAX.FAX := MAX_FAX + 1 
ENDv 
12:BEGIN 

FACT_FIG := FACT_FIG + * 1 * \ 
MAX.FAX := MAX_FAX + 1 
END( 

13:BEGIN 

FACT_FIG := FACT_FIG + 
MAX^FAX := MAX.FAX + 1 
END) 

BEGIN 

SHORT_RULE := 'K') 

FACT.FIG := FACT_FIG + 'K') 
MAX.FAX := MAX_FAX + 1 
END) 

15: BEGIN 

SHORT_RULE : = ' L ' ) 

FACT.FIG := FACT_FIG + 'L') 
MAX_FAX := MAX.FAX + 1 
END) 

16: BEGIN 

SHORT_RULE := *M') 

FACT_FIG := FACT_FIG ♦ *M') 
MAX_FAX := MAX_FAX + 1 
END) 

17: BEGIN 

SHORT.RULE := *N') 

FACT_FIG := FACT_FIG + 'N* ) 
MAX_FAX := MAX.FAX + 1 
END) 

16: BEGIN 

SHORT.RULE := 'O') 

FACT_FIG := FACT.FIG + *0') 
MAX.FAX := MAX.FAX + 1 
END) 

19:BEGIN 

SHORT_RULE := 'PM 
FACT_FIG := FACT_FIG + 'P') 
MAX.FAX := MAX_FAX + 1 
END) 

20: BEGIN 

SHORT_RULE := 'Q' ) 

FACT_FIG := FACT_FIG + 'Q') 
MAX.FAX := MAX_FAX + 1 
END) 

21: BEGIN 

SHORT_RULE := 'R') 

FACT_FIG := FACT_FIG ♦ 'R') 
MAX_FAX := MAX.FAX + 1 
END) 

22:BEGIN 

SHORT_RULE ;= 'S') 

FACT.FIG := FACT_FIG + 'S') 
MAX.FAX := MAX.FAX + 1 
END) 

23: BEGIN 

SHORT_RULE := 'T') 

FACT.FIG := FACT_FIG + 'T') 
MAX.FAX := MAX_FAX + 1 
END) 

2^; BEGIN 

SHORT^RULE := 'U' ) 

FACT_FIG := FACT.FIG + 'U') 
MAX.FAX := MAX_FAX + 1 
END) 

25: BEGIN 

SHORT_RULE := 'V') 

FACT_FIG := FACT_FIG + 'V') 
MAX.FAX := MAX_FAX + 1 
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END) 

26: BEGIN 

SHORT_RULE := *W) 

FACT.FIG := FACT.FIG + 'H*) 

MAX.FAX := MAX.FAX ♦ 1 
END) 

END) 

IF CODE IN [10,11,12,13] THEN BEGIN 
RUN.LTS := CODE) 

MID.RULE := MID.RULE + *!*) 

MID.SIZE := MID.SI2E + 1) 

END 

ELSE IF CODE IN [1^,15,16,17,18,191 THEN BEGIN 
DSHAPE := CODE) 

MID.RULE := MID.RULE + *&*) 

MID_SIZE := MID_SIZE + 1) 

HRITELN( 'INTERPRETATION OF DAYSHAPE IS: ' )) 

END 

ELSE IF CODE IN [20,21,22,23,24,25,261 THEN BEGIN 
SPEC.LTS := CODE) 

MID.RULE := MID.RULE + '?') 

MID_SIZE := MID_SIZE + 1) 

HRITELN( 'INTERPRETATION OF SPECIAL LIGHTS IS:')) 
END END) 



PROCEDURE DISPL.RULE ( RULE : RULE.STR )RULE.LEN : INTEGER )SETTING : CODE.INT ) ) 



VAR 

I:INTEGER) 



BEGIN 

FOR I ;= 1 TO RULE. 

CASE RULE[I1 OF 
•a' :WRITELN( ' 
'b' : WRITE LN( ' 
'c' :WRITELN( ' 
'd' :WRITELN( ' 
'©• :WRITELN( ' 
'f ' :WRITELN( ' 
'g' :WRITELN( ' 
'h' :WRITELN( ' 
•i' :WRITELN( ' 
' j' :WRITELN( ' 
-.BEGIN 



LEN DO 

TIME = DAY. ' ) 
TIME = NIGHT. 
TARGET ANGLE 
TARGET ANGLE 
TARGET ANGLE 
TARGET ANGLE 
RELATIVE BRG 
RELATIVE BRG 
RELATIVE BRG 
RELATIVE BRG 



)) 

IS STBD FWD. 
IS AFT. ' )) 
IS PORT FWD. 
IS 000. ' )) 
IS STBD FWD. 
IS AFT. ' )) 
IS PORT FWD. 
IS 000. ' )) 



• )) 
• )) 
*)) 
' )) 



WRITELN( ' WHEN LIGHTING PATTERN IS RED OVER GREEN, 
WRITE LN( ' CONTACT IS A SAILING VESSEL. ' ) 

END) 

'm': BEGIN 



)) 



IF (TIME = 1) THEN 

WRITELN( ' WHEN DAYSHAPE IS TWO BLACK BALLS,') 

ELSE 

WRITELN( ' WHEN LIGHTING PATTERN IS RED OVER RED,')) 
WRITE LN( ' VESSEL IS NOT UNDER COMMAND. ' ) 

END) 

'n': BEGIN 



IF (TIME = 1) THEN 

WRITELN( ' WHEN DAYSHAPE IS BALL DIAMOND BALL,') 

ELSE 

WRITELN( ' WHEN LIGHTING PATTERN IS RED OVER WHITE OVER RED,')) 
WRITE LN( ' VESSEL IS RESTRICTED IN ITS" ABILITY TO MANEUVER.') 
END) 

'o' .-BEGIN 



WRITELN( ' WHEN LIGHTING PATTERN IS RED OVER WHITE,' )) 
WRITELN( ' VESSEL IS ENGAGED IN FISHING. ' ) 

END) 

'p' :BEGIN 

WRITELN( ' WHEN LIGHTING IS GREEN OVER WHITE,')) 
WRITELN( ' VESSEL IS ENGAGED IN TRAWLING. ' ) 
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END) 

*q* :BEGIN 

IF (TIME = 1) THEN 

WRITELNt • WHEN DAYSHAPE IS CYLINDER,') 

ELSE 

WRITELNC ■ WHEN LIGHTING PATTERN IS RED OVER RED OVER RED,')) 
WRITELNC • VESSEL IS CONSTRAINED BY ITS" DRAFT.') 

END) 

'r' :BEGIN 



WRITE LN( 
WRITELNC 



'u' 


END) 

WRITELN( ' 


'V' 


WRITE LN( ' 


'z' 


WRITELN( ' 




WRITELN( ' 


'A' 


WRITELN( ' 


'B' 


WRITELN( ' 


'C 


WRITELN( ' 


'D' 


WRITELN( ' 


'E' 


WRITELN( ' 


'F' 


WRITELN( ' 


'G' 


BEGIN 



WHEN DAYSHAPE IS DOUBLE CONES,' )) 

VESSEL IS ENGAGED IN FISHING OR TRAWLING. 



)) 



REDUCED VISIBILITY: RADAR CONTACT, 

OWN SHIP HAS SPECIAL STATUS,')) 

CONTACT HAS SPECIAL STATUS,')) 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM.')) 
CONTACT IS A SAILING VESSEL UNDER SAIL,')) 
CONTACT IS CROSSING FROM PORT TO STBD. ' )) 
CONTACT IS CROSSING FROM STBD TO PORT.')) 
MEETING CONTACT HEAD TO HEAD.')) 

OVERTAKING THE CONTACT.')) 

BEING OVERTAKEN BY THE CONTACT,')) 



WRITELN( 

WRITELNC 

END) 

'H' :BEGIN 

WRITELN( 

WRITELNl 

END) 

'I';BEGIN 

WRITELNC 

WRITELN( 

END) 

'J':BEGIN 

WRITELNC 

WRITELN( 

END) 

'K' :BEGIN 



YOU OBSERVE A 
PORT AND STBD 



STANDARD LIGHTING PATTERN OF:')) 
RUNNING, MASTHEAD, RANGE. ' ) 



YOU OBSERVE A STANDARD LIGHTING PATTERN OF:')) 
PORT RUNNING, MASTHEAD, RANGE, ' ) 



YOU OBSERVE A STANDARD LIGHTING PATTERN OF:')) 
STBD RUNNING, MASTHEAD, RANGE. ' ) 



YOU OBSERVE 
STERN. ' ) 



A STANDARD LIGHTING PATTERN OF:')) 



IF (SETTING = 2) THEN 

WRITELNC ' WHEN DAYSHAPE IS A BASKET, ')) 

WRITELNC ' THE VESSEL IS ENGAGED IN FISHING,') 

END) 

'L' :BEGIN 

IF (SETTING = 2) THEN BEGIN 

WRITE LN(' WHEN DAYSHAPE IS TWO ORANGE i WHITE ')) 

WRITE LN( ' VERTICALLY STRIPED BALLS. ') 

END) 

WRITELN( ' THE VESSEL IS ENGAGED IN SERVICING NAVIGATION AIDS.') 
END) 

'M' :BEGIN 

IF (SETTING = 2) THEN BEGIN 

WRITELN( ' WHEN DAYSHAPE IS A DIAMOND, TOP HALF BLACK & WHITE' )) 
WRITELN( ' STRIPED, LOWER HALF SOLID RED, ') 

END) 

WRITELN( ' THE VESSEL HAS A SUBMERGED TOW,') 

END) 

•N' :BEGIN 

IF (SETTING = 2) THEN BEGIN 

WRITELN( ' WHEN DAYSHAPE IS A BLACK & WHITE STRIPED ')) 

WRITELN( ' BALL OVER A SOLID RED BALL, ') 

END) 

WRITE LN( ' THE VESSEL IS ENGAGED IN LAYING CABLE.') 

END) 

'O' .-BEGIN 

IF (SETTING = 2) THEN 

WRITELN( ' WHEN DAYSHAPE IS TWO BLACK BALLS, ')) 

WRITELN( ' THE VESSEL IS ENGAGED IN DREDGING. ' ) 

END) 
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'P* :BEGIN 



IF (SETTING = 2) THEN 

HRITELNC • HHEN DAYSHAPE IS ONE BLACK BALL, 

HRITELN( ' THE VESSEL IS ANCHORED.*) 

ENDS 
*Q* : BEGIN 

IF (SETTING = 2) THEN 

HRITELN( * HHEN LIGHTING PATTERN IS RED OVER HHITE , *)s 
HRITELN( * THE VESSEL IS ENGAGED IN FISHING. * ) 

ENDS 

*R*:BEGIN 

IF (SETTING = 2) THEN BEGIN 

HRITELN( * HHEN LIGHTING PATTERN IS HHITE OVER RED * )s 
HRITELN( * OVER RED OVER HHITE, *) 

ENDS 

HRITELN( * THE VESSEL HAS A SUBMERGED TOH. * ) 

ENDS 

*S* : BEGIN 

IF (SETTING = 2) THEN 

HRITELN( * HHEN LIGHTING PATTERN IS HHITE OVER RED OVER RED, * )s 
HRITELN( * THE VESSEL IS ENGAGED IN DREDGING. * ) 

ENDS , 

•T*; BEGIN 

IF (SETTING = 2) THEN BEGIN 

HRITELN( * HHEN LIGHTING PATTERN IS HHITE OVER RED *)s 
HRITELN( * OVER RED OVER RED OVER RED, *) 

ENDS 

HRITELN( * THE VESSEL IS ENGAGED IN DREDGING.') 

ENDS 
*U* ;BEGIN 

IF (SETTING = 2) THEN 

HRITELN( * HHEN LIGHTING PATTERN IS RED OVER RED OVER RED, *)s 
HRITELN( * THE VESSEL IS ENGAGED IN LAYING CABLE.*) 

ENDS 
*V* .‘BEGIN 

IF (SETTING = 2) THEN BEGIN 

HRITELN( * HHEN LIGHTING PATTERN IS ONE HHITE LIGHT FHD * )S 
HRITELN( • AND ONE HHITE LIGHT AFT, *) 

ENDS 

HRITELN( * THE VESSEL IS ANCHORED.*) 

ENDS 

*H*;BEGIN 

IF (SETTING = 2) THEN 

HRITELN( * HHEN LIGHTING PATTERN IS RED OVER RED, *)s 
HRITELN( * THE VESSEL IS ENGAGED IN SERVICING NAVIGATION AIDS.*) 
ENDS 

END ENDS 

PROCEDURE CHECK2 ( INPUT^ARRAY iSELECT.ARRAY sH : INTEGERS VAR OKAY : BOOLEAN ) s 
VAR 

D,E,P,Q:INTEGERs 

TIME_OK , DUPED ,SAME.GROUPl ,SAME_GROUP2 ,SAME_GROUP3 ,SAME_GROUP^ : BOOLEAN s 
BEGIN 

TIME_OK := FALSE s 
DUPED := FALSE s 
SAME_GROUPl := FALSE s 
SAME_GROUP2 := FALSE s 
SAME.GROUP3 ;= FALSE s 
SAME_GR0UP4 ;= FALSE s 
FOR D := 1 TO H-1 DO 

IF (INPUT_ARRAY[Dl = 1 ) OR ( INPUT_ARRAY( D 1 = 2) THEN 
TIME.OK := TRUE s 
IF NOT TIME_OK THEN BEGIN 
OKAY:= FALSE s 

HRITELN( 'NO TIME PERIOD HAS ENTERED. A TIME PERIOD MUST BE ENTERED* )S 
HRITELN( 'BEFORE A SITUATION CAN BE ANALYZED. *)s 
HRITELN( 'RE-ENTER SELECTION NUMBERS. * )S 
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WRITELN( *T0 CONTINUE, PRESS ANY KEY.')> 

HHILE NOT KEYPRESSED DO 
DELAY(1)> 

WRITELNjHRITELN 

END( 

FOR D := 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 

IF (INPUT. ARRAYED! = INPUT.ARRAYE E ! ) THEN BEGIN 
OKAY := FALSER 
P := Di 
DUPED := TRUE 
END( 

IF DUPED THEN BEGIN 

WRITELN( 'SELECTION INPUT. ARRAYE P ], ' IS DUPLICATED .') J 
WRITELN( 'RE-ENTER SELECTION NUMBERS. *)J 
WRITELNCTO CONTINUE, PRESS ANY KEY.')j 
HHILE NOT KEYPRESSED DO 
DELAYED^ 

WRITELNjHRITELN 

END^ 

FOR D := 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 

IF ((INPUT.ARRAYED! IN E5,6,7,8,9!) AND ( INPUT. ARRAYE E 1 IN 
E5,6,7,8,9!)) THEN BEGIN 
OKAY := FALSER 
P := Dj 
Q := Ej 

SAME.GROUPl := TRUE 
END> 

IF SAME.GROUPl THEN BEGIN 

HRITELN( 'SELECTIONS ' ,INPUT.ARRAYE P ] , ' AND ', INPUT. ARRAYE Q ], ' CAN NOT ' ) j 
HRITELN( 'BE SELECTED TOGETHER BECAUSE ONLY ONE MEETING SITUATION CAN 
WRITELN( 'OCCUR BETHEEN TWO SHIPS AT ANY ONE TIME.')J 
WRITELNt 'TO CONTINUE, PRESS ANY KEY.')j 
.WHILE NOT KEYPRESSED DO 
DELAYED^ 

WRITELNjWRITELN 

END> 

FOR D := 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 

IF ((INPUT.ARRAYED! IN E 10 , 11 , 12 , 13 ! ) AND ( INPUT.ARRAYE E ! IN 
E10,11,12,13!)) THEN BEGIN 
OKAY := FALSER 
P := 

Q := E> 

SAME.GROUP2 := TRUE 
END^ 

IF SAME.GROUP2 THEN BEGIN 

WRITELN( 'SELECTIONS ', INPUT.ARRAYE P !, ' AND ', INPUT.ARRAYE Q !, ' CAN NOT ' ) > 
WRITELNCBE SELECTED TOGETHER BECAUSE TWO DIFFERENT STANDARD LIGHTING' 
WRITELN( 'PATTERNS ARE NOT NORMALLY SEEN ON THE SAME SHIP.')> 

WRITELN( 'RE-ENTER SELECTION NUMBERS. 

WRITELN( 'TO CONTINUE, PRESS ANY KEY.')J 
WHILE NOT KEYPRESSED DO 
DELAY(1)J 
WRITELNjWRITELN 
END> 

FOR D := 1 TO H-2 DO 

FOR E := D+1 TO H-1 DO 

IF ( (INPUT.ARRAY[D! IN (14,15,16,17,18,19!) AND ( INPUT.ARRAYE E ! IN 
(14,15,16,17,18,19!)) THEN BEGIN 
OKAY := FALSER 
P ;= Dj 
(3 := E\ 

SAME.GROUP3 := TRUE 
END^ 

IF SAME.GROUP3 THEN BEGIN 

WRITELN( 'SELECTIONS ', INPUT.ARRAYE P !, ' AND ', INPUT.ARRAYE (5 !, ' CAN NOT ' ) j 
WRITELN( 'BE SELECTED TOGETHER BECAUSE TWO DIFFERENT DAYSHAPES ARE NOT ' ) J 
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WRITELN( 'NORMALLY SEEN ON THE SAME SHIP. RE-ENTER SELECTION NUMBERS. ')> 
WRITE LN( 'TO CONTINUE, PRESS ANY KEY.')> 

WHILE NOT KEYPRESSED DO 
DELAY(1)> 

WRITELNjWRITELN^ 

END> 

FOR D := 1 TO H-2 DO 

FOR E := D«H TO H-1 DO 

IF ( (INPUT_ARRAY[D] IN [20,21,22,23,24,25,261) AND ( INPUT. ARRAYt E 1 IN 
[20,21,22,23,24,25,26])) THEN BEGIN 
OKAY := FALSER 
P := D> 

Q := E> 

SAME.GR0UP4 := TRUE 
END^ 

IF SAME.GR0UP2 THEN BEGIN 

WRITELN( 'SELECTIONS ' ,INPUT_ARRAY[ P 1 , * AND ' ,INPUT_ARRAY[ Q ) , ' CAN NOT' )> 
WRITELN( 'BE SELECTED TOGETHER BECAUSE TWO DIFFERENT SPECIAL LIGHTING' )> 
WRITELNC 'PATTERNS ARE NOT NORMALLY SEEN ON THE SAME SHIP.')> 

WRITELN( 'RE-ENTER SELECTION NUMBERS. ')> 

WRITELN( 'TO CONTINUE, PRESS ANY KEY.')> 

WHILE NOT KEYPRESSED DO 
DELAY(1)> 

WRITELNjWRITELNj 
END END> 



PROCEDURE INFER_ENG( XRULE : RULE.STR jSIZE ,SETTING : INTEGER ) J 
VAR 

FOUND; BOOLEAN J 

RULE.BASE.SIZE ,H ,I , J ,B , COUNT : INTEGER > 

BEGIN 

H ;= 1> 

FOUND := FALSER 
IF (RULE.SET = 1) THEN 

RULE.BASE.SIZE := MAX.INTL.RULE 
ELSE 

RULE.BASE.SIZE ;= MAX.INLD.RULE J 
WHILE NOT FOUND AND (H <= RULE.BASE.SIZE ) DO BEGIN 
COUNT := 

FOR I := 1 TO SIZE DO 

FOR J := 1 TO SIZE DO BEGIN 
IF (RULE.SET = 1) THEN BEGIN 

IF (XRULE[I1 = INTL_RULES[H1.RULE_FIG[J]) THEN 
COUNT := COUNT + U 

IF ( COUNT=LENGTH( INTL_RULES[ H 1 . RULE.FIG ) ) 

THEN 

BEGIN 

B := H) 

FOUND := TRUEj 
END> 

END 

ELSE BEGIN 

IF (XRULE[I1 = INLD.RULES[Hl.RULE_FIG[J]) THEN 
COUNT := COUNT + 1> 

IF ( COUNT= LENGTH! INLD.RULES[ H 1 . RULE.FIG ) ) 

THEN 

BEGIN 

B := Hj 

FOUND := TRUEj 
ENDj 

END( 

ENDv 

H := H + 1> 

ENDj 

IF FOUND THEN BEGIN 
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CASE SETTING OF 
1: BEGIN 

WRITELNv 

HRITELN( 'CONCLUSION IS: ' 

IF (RULE_SET = 1) THEN 

MAP_CONL( INTL_RULESCBl.CONL ) 

ELSE 

MAP_CONL ( INLD.RULESl B 1 . CONL ) J 
HRITELNj 

HRITELN( 'HHEN THE FOLLOHING FACTS ARE TRUE : ' ) j 
IF (RULE_SET = 1) THEN 

DISPL_RULE(INTL.RULESIB1.RULE_FIG, SIZE, SETTING) 
ELSE 

DISPL_RULE ( INLD_RULES[ B ] . RULE_FIG,SIZE , SETTING ) j 
WRITE LN) 

WRITE LN( 'TO CONTINUE, PRESS ANY KEY.')j 
WHILE NOT KEYPRESSED DO 
DELAY(1)J 

ENO^ 

2 .-BEGIN 

WRITE LNj 

IF (RULE_SET = 1) THEN BEGIN 

DISPL_RULE ( INTL_RULES[ B 1 . RULE.FIG ,SIZE , SETTING ) \ 

MAP_CONL( INTL_RULESlB J.CONL ) j 

END 

ELSE BEGIN 

DISPL_RULE(INLD_RULESlB I. RULE_FIG, SIZE, SETTING 
MAP_CONL( INLD.RULESEB ] . CONL ) 

ENOv 

WRITE LNj 
ENDS 

5: IF (RULE_SET = 1) THEN 

MAP_CONL( INTL_RULES[B l.CONL ) 

ELSE 

MAP_CONL( INLD.RULESlB ] .CONL ) J 

END> 

END 

ELSE BEGIN 

WRITELNjWRITELN( 'NO MATCH IN RULE BASE.')) 

WRITELN( 'NO RISK OF COLLISION HAS BEEN DETECTED.')) 

WRITELN) 

IF (SETTING = 2) OR (SETTING = 3) THEN 
WRITELN( 'RE-ENTER SELECTION NUMBERS. ' )) 

CONTINUE := FALSE) 

END END) 



PROCEDURE DAY_ASPECT (VAR TA.DONE: BOOLEAN )BEARING: INTEGER )XCODE:SHORT_INT) 

TA:SHRT_STR)) 



VAR 

OKAY: BOOLEAN) 

CODE , VIS_TA_INT : INTEGER ) 

VIS_TA:SHRT_STR) 

VIS.QUAD ,MOBD_QUAD : CHAR ) 

BEGIN 

REPEAT 

OKAY := TRUE) 

IF XCODE = 1 THEN BEGIN 
WRITELN) 

WRITELN( 'ENTER THE VISUAL TARGET ANGLE IN THREE DIGIT FORMAT.')) 
END 

ELSE BEGIN 
WRITELN) 

WRITELN( 'ENTER MANEUVERING-BOARD-DETERMINED TARGET ANGLE IN')) 
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HRITELN( 'THREE DIGIT FORMAT.') 

END( 

READLN(VIS.TA)> 

HRITE LN >HRITE LN ( VIS.TA ) > 

IF NOT(VIS_TACll IN [ * 0 ' , ' 1 ' , ' 2 ' , ' 3 ' )) THEN BEGIN 
WRITELN( 'ILLEGAL ENTRY. RE-ENTER TARGET ANGLE.')) 

OKAY := FALSE 
END) 

IF (VIS_TA[ll = '3' ) THEN 

IF NOT(VIS_TAC2l IN C 'O' , , '2' , '3' , '4' , '5' ] ) THEN BEGIN 
WRITELNC 'ILLEGAL ENTRY. RE-ENTER TARGET ANGLE.')) 

OKAY := FALSE) 

END 

ELSE 

IF NOT(VIS_TAC2] IN [ *0 ' , '1 ' , ' 2' , '3' , '4' , '5' , '6 ' , ' 7' , 

'8' , '9' )) THEN BEGIN 

HRITELN( 'ILLEGAL ENTRY. RE-ENTER TARGET ANGLE.')) 

OKAY := FALSE 
END) 

IF N0T(VIS_TA[3] IN C 'O' , , '2' , '3' , '4' , '5' , '6' , '7' , '8' , 

'9' 1) THEN BEGIN 

WRITELNC 'ILLEGAL ENTRY. RE-ENTER TARGET ANGLE.*)) 

OKAY := FALSE 
END) 

UNTIL OKAY) 

VAL(VIS_TA,VIS_TA_INT,CODE )) 

MAP_TA( VIS_QUAD ,VIS_TA_INT ) ) 

MAP.TAC MOBD_QUAD , BEARING ) ) 

IF (VIS_QUAD = MOBD_QUAD) THEN BEGIN 
TA_DONE ;= TRUE 5 

FACT_FIG := FACT^FIG ♦ VIS^QUAD) 

MAX.FAX := MAX_FAX +1) 

END 

ELSE BEGIN 

IF (XCODE = 1) THEN BEGIN 
WRITELN) 

WRITELNC 'PROGRAM-COMPUTED TARGET ANGLE DIFFERS FROM VISUAL TARGET')) 
WRITELNC 'ANGLE AND WILL RESULT IN DIFFERENT MEETING SITUATIONS.')) 
WRITELNC 'PROGRAM-COMPUTED TARGET ANGLE IS ',TA)) 

WRITELNC 'RE -CHECK MANEUVERING BOARD SOLUTION AND VISUAL ASPECT.*)) 
WRITELN) 

END 

ELSE BEGIN 
WRITELN) 

WRITELNC 'PROGRAM-COMPUTED TARGET ANGLE DIFFERS FROM MANEUVERING BOARD')) 
WRITELNC 'SOLUTION. PROGRAM-COMPUTED TARGET ANGLE IS *,TA)) 

WRITELNC 'RE-CHECK SOLUTION. * )) 

WRITELN 

END) 

END END) 



PROCEDURE TGT.ANGLE) 

VAR 

TARGET_ANGLE_INT ,CODE : INTEGER ) 

OKAY ,TA_DONE : BOOLEAN ) 

TARGET. ANGLE ,CONTACT.HDG : SHRT.STR ) 

XCODE rSHORT.INT) 

BEGIN 

TA.DONE := FALSE) 

REPEAT 

REPEAT 

OKAY := TRUE) 

WRITELN) 

WRITELNC 'ENTER THE MANEUVER-BOARD-SOLUTION CONTACT HEADING IN')) 
WRITELNC 'THREE DIGIT FORMAT. ' )) 
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READLNI CONTACT_HDG ) j 

WRlTELN;WRITELN(CONTACT_HDG)vWRITELNj 
IF NOT<CONTACT_HDG[11 IN [ '0 ' , * 1 ' , ' 2 * , *3 ' ] ) THEN BEGIN 
HRITELN( 'ILLEGAL ENTRY. RE-ENTER HEADING. ' 

OKAY := FALSE 
END( 

IF (CONTACT.HDGCll = '3') THEN 

IF N0T(C0NTACT.HDG[21 IN [ '0 ' , ' 1 ' , ' 2 ' , '3 ' , , '5* 1) THEN BEGIN 
WRITELN( 'ILLEGAL ENTRY. RE-ENTER HEADING. *)v 
OKAY ;= FALSE} 

END 

ELSE 

IF N0T(C0NTACT.HDG[2l IN t 'O' , , '2' , '3' , '4' , '5' , '6' , '7' , 

•8' ,'9' n THEN BEGIN 

WRITELN( 'ILLEGAL ENTRY. RE-ENTER HEADING.')} 

OKAY := FALSE 
END} 

IF NOT(CONTACT_HDG[3l IN [ ' 0 ' , ' 1 ' , ' 2 ' , ' 3 ' , , '5 ' , '6 ' , ' 7' , '8' , 

'9' ]) THEN BEGIN 

WRITELN( 'ILLEGAL ENTRY. RE-ENTER HEADING.')} 

OKAY := FALSE 
END} 

UNTIL OKAY} 

CALC_TGT_ANG( TARGET_ANGLE ,C0NTACT_TRUE3RG ,CONTACT.HDG ) } 

VALI TARGET.ANGLE ,TARGET_ANGLE.INT ,CODE ) } 

IF (TIME = 1) AND ( LOW^VIS = 1) THEN BEGIN 
XCODE := 1} 

DAY_ASPECT( TA.DONE ,TARGET_ANGLE_INT , XCODE ,TARGET_ANGLE ) } 

END 

ELSE IF (TIME = 2 ) AND ( LOW^VIS = 1) THEN 

NIGHT_ASPECT( TA.DONE ,TARGET_ANGLE_INT ,TARGET_ANGLE ) 

ELSE IF LOW.VIS = 2 THEN BEGIN 
XCODE := 2} 

OAY.ASPECT( TA.OONE ,TARGET_ANGLE_INT , XCODE ,TARGET_ANGLE ) 

END} 

UNTIL TA.DONE END} 



PROCEDURE RELATIVE_BRG} 

VAR 

OKAY: BOOLEAN} 

REL_(3UAD:CHAR} 

YOUR.HDG , RE L.BRG : SHRT.STR } 

HTB.INT ,YOUR.HDG.INT ,REL_BRG_INT ,CODE : INTEGER } 



BEGIN 

REPEAT 

OKAY := TRUE} 

WRITELN} 

WRITELN( 'ENTER THE CONTACT "S TRUE BEARING IN THREE DIGIT FORMAT.')} 
READLN( C0NTACT_TRUE_BRG ) } 

WRITELN }WRITELN( CONTACT_TRUE_BRG ) } 

IF N0T(C0NTACT_TRUE_BRG[ 11 IN [ ' 0 ' , ' 1 ' , ' 2 ' , ' 3 ' ] ) THEN BEGIN 
WRITELN( 'ILLEGAL ENTRY. RE-ENTER BEARING.')} 

OKAY := FALSE 
END} 

IF (C0NTACT_TRUE_BRG[1] = '3') THEN 

IF N0T(C0NTACT_TRUE_BRG[21 IN [ ' 0 ' , ' 1 ' , ' 2 ' , ' 3 ' , ' 5' 1 ) THEN BEGIN 
WRITELN( 'ILLEGAL ENTRY. RE-ENTER BEARING.')} 

OKAY ;= FALSE} 



END 

ELSE 

IF N0T(C0NTACT.TRUE.BRG[2] IN [ ' 0 ' , ' 1 * , ' 2 ' , ' 3 ' , '4 ' , *5 ' , ' 6 ' , 
'7', '8', '9' ]) THEN BEGIN 

WRITELN( 'ILLEGAL ENTRY. RE-ENTER BEARING.')} 

OKAY := FALSE 
END} 

IF N0T(C0NTACT_TRUE_BRG[3] IN [ ' 0 ' , ' 1 * , ' 2 ' , ' 3 ' , ' 5 ' , ' 6 ' , ' 7' , 
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•8*, '9* 1) THEN BEGIN 

HRITELN( 'ILLEGAL ENTRY, RE-ENTER BEARING. ')j 
OKAY := FALSE 
END) 

UNTIL OKAY) 

REPEAT 

OKAY := TRUE) 

WRITELN) 

HRITELN( 'ENTER YOUR SHIP"S HEADING IN THREE DIGIT FORMAT.')) 
READLN(YOUR_HDG)) 

HRITELN )HRITELN( YOUR_HDG ) ) 

IF NOT(YOUR_HDGll] IN [ 'O' , ' 2' , '3' ]) THEN BEGIN 
HRITELNC 'ILLEGAL ENTRY. RE-ENTER HEADING.')) 

OKAY := FALSE 
END) 

IF (YOUR.HDGlll = '3') THEN 

IF NOT(YOUR.HDG[2] IN I ' 0 ' , ' 1 ' , ' 2 ' , ' 3 ' , '4 ' , '5 ' ] ) THEN BEGIN 
HRITELN( 'ILLEGAL ENTRY. RE-ENTER HEADING.')) 

OKAY := FALSE) 

END 

ELSE 

IF NOT(YOUR_HDGl2l IN I ' 0 ' , ' 1 ' , ' 2 ' , ' 3 ' , '4 ' , '5 ' , ' 6 ' , ' 7 ' , '8 ' , 
'9' ]) THEN BE6IN 

HRITELN( 'ILLEGAL ENTRY. RE-ENTER HEADING.')) 

OKAY := FALSE 
END) 

IF NOT(YOUR_HDG[3l IN I ' 0 ' , ' 1 ' , ' 2 ' , ' 3 ' , , '5 ' , ' 6 ' , ' 7 ' , 

'8' ,’9' ]) THEN BEGIN 

WRITELNt 'ILLEGAL ENTRY. RE-ENTER HEADING.')) 

OKAY := FALSE 
END) 

UNTIL OKAY) 

VAL( C0NTACT.TRUE.BRG,HTB.INT,C0DE ) ) 

VAL( YOUR.HDG ,YOUR_HDG_INT ,CODE ) r 
REL.BRG^INT := HTB.INT - YOUR_HDG_INT ) 

IF (REL.BRG_INT < 0) THEN 

REL.BRG_INT := REL.BRG_INT + 360) 

MAP_RB( REL_QUAD ,REL.BRG_INT ) ) 

FACT.FIG := FACT.FIG + REL_QUAD) 

MAX_FAX := MAX_FAX + 1 END) 



PROCEDURE MAP_SPEC_STAT( VAR RULE : RULE.STR )CODE : INTEGER ) ) 
BEGIN 

CASE CODE OF 

6:RULE := '!') 

12,7:RULE := 'm' ) 

8,13:RULE := 'n' ) 

9:RULE := 'o') 

10:RULE := 'p') 11,15:RULE := 'q') 

1^:RULE := 'r' 

END) END) 



PROCEDURE MAP_INTNL ( CODE ; INTEGER ) ) 

CONST 

LEN = 1) 



VAR 

SHORT.RULE ; RULE.STR ) 

BEGIN 

CASE CODE OF 
1: BEGIN 

MID_RULE := MID.RULE + 'a') 
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MID_SIZE := MID.SI2E + 

TIME ;= l\ 

TIMEl := 

FACT_FIG := FACT_FIG ♦ 

MAX.FAX := MAX_FAX ♦ 1 
END( 

2: BEGIN 

MID_RULE := MID_RULE + 

MID_SI2E := MID_SIZE ♦ l\ 

TIME := 2j 
TIME2 := Z\ 

FACT.FIG := FACT.FIG + 

MAX_FAX := MAX.FAX ♦ 1 
END I 
5: BEGIN 

FOG := 

MID.RULE := MID.RULE + *u' > 

MID_SIZE := MID.SI2E + 1\ 

FACT.FIG := FACT.FIG ♦ \ 

MAX_FAX := MAX. FAX ♦ 

LON.VIS := 2 
END> 

4: BEGIN 

FOG2 := 

FOG.SIG.CONTACT := TRUE J 
FACT.FIG := FACT.FIG ♦ \ 

MAX.FAX := MAX.FAX + l\ 

MIO.RULE := MIO.RULE + 's'j 

MIO.SIZE := MID.SIZE + 1 

END( 

5: BEGIN 

MID.RULE := MID.RULE + *v*j 

MID.SIZE := MID.SIZE + l\ 

FACT.FIG := FACT.FIG ♦ 'v' j 

MAX.FAX := MAX.FAX + 1 

END( 

6,7,8,9>10,11,12, 

13>14>1S:BEGIN 

MAP.SPEC.STAK SHORT.RULE >CODE ) J 
IF CODE IN 112,13,14,15] THEN BEGIN 
DSHAPE := CODEi 
MID.RULE := MID.RULE ♦ *w'> 

MID.SIZE := MID.SIZE + l\ 

, WRITELN( 'INTERPRETATION OF DAYSHAPE IS:*)j 

END 

ELSE BEGIN 

SPEC.LTS := CODE J 

MID.RULE := MID.RULE ♦ 'x*> 

MID.SI2E ;= MID.SIZE + 

WRITELN( 'INTERPRETATION OF SPECIAL LIGHTS IS:') 
END( 

SETTING := 2> 

INFER_ENG( SHORT.RULE , LEN , SETTING ) 

ENDj 

16,17,18,19:BEGIN 

RUN.LTS := CODEj 
MID.RULE := MID.RULE ♦ 't'j 
MID.SIZE := MID.SIZE + Ij 
LTGCODE := CODE 
END( 

END END^ 



PROCEDURE MENU> 

TYPE 

NUM.TYPE = SET OF 1..26> 
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VAR 

INPUT_ARRAY : SELECT^ARRAY > 

OKAY: BOOLEAN > 

DELIM:CHAR> 

LEN ,CODE ,NUM ,R ,G ,H ,I , DELIMPOS : INTEGER > 

LONGCODE : INPUT.STR > 

SHORT.RULE : RULE^STR > 

TEMP:STRING[31> 

SELECT.SET ,SPEC_SET : NUM.TYPE > 

BEGIN 

SELECT.SET := Cl..26l> 

DELIM := 

REPEAT 

CLRSCRj 
I :=0> 

H :=1> 

OKAY := TRUEj 

IF (RULE_SET = 1) THEN BEGIN 
PRINT_MENU> 

READLNt LONGCODE 
HRITELN( LONGCODE )>WRITELN> 

END 

ELSE 

PRINT_MENU2( LONGCODE ) > 

LEN := LENGTH ( LONGCODE 
FOR R := 1 TO LEN DO 

WHILE (LONGCODElRl = * *) AND ( LENGTH ( LONGCODE ) >= 1 ) DO 
DELETE ( LONGCODE ,R , 1 ) > 

IF (LENGTH (LONGCODE) = 0) THEN BEGIN 
OKAY := FALSE) 

WRITELN)WRITELN( 'NO SELECTION WAS MADE. * )) 

END 

ELSE BEGIN 
REPEAT 

IF (LENGTH (LONGCODE) > 2) THEN BEGIN 
DELIMPOS := POS( DELIM, LONGCODE ) ) 

IF (DELIMPOS = 0) AND (I > 0) THEN BEGIN 
DELETE( LONGCODE, 1,23)) 

OKAY := FALSE 
END) 

TEMP := COPY( LONGCODE, l,DELIMPOS-D) 

DELETE ( LONGCODE ,1 ,DELIMPOS ) ) 

END 

ELSE BEGIN 

TEMP ;= LONGCODE) 

DELETE (LONGCODE, 1,2) 

END) 

VAL(TEMP,NUM,CODE)) 

IF (NUM IN SELECT_SET) AND (CODE=0) THEN BEGIN 
INPUT_ARRAY[HJ := NUM) 

H := H+1) 

END 

ELSE 

OKAY := FALSE) 

I := I + 1) 

UNTIL ( LENGTH ( LONGCODE ) = 0) 

END) 

IF NOT OKAY THEN BEGIN 

WRITELN( 'ILLEGAL ENTRY. RE-ENTER SELECTION NUMBERS. * ))WRITELN) 
WRITELN( 'TO CONTINUE, PRESS ANY KEY. ' )) 

WHILE NOT KEYPRESSED DO 
DELAY(D) 

WRITELN)WRITELN 

END) 

IF OKAY THEN 

IF (RULE.SET = 1) THEN 

CHECK( INPUT^ARRAY ,H ,OKAY ) 

ELSE 
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CHECK2( INPUT.ARRAY ,H ,OKAY ) i 
UNTIL OKAYJ 
FOR G := 1 TO H-1 DO 

IF (RULE.SET = 1) THEN 

M AP_INTNL ( INPUT. ARRAY I G 1) 

ELSE BEGIN 

MAP.INLAND( INPUT.ARRAYlG 1 , SHORT. RULE ) \ 
SPEC.SET := [1£¥..Z6]\ 

IF INPUT.ARRAYCGl IN SPEC.SET THEN BEGIN 
LEN := 

SETTING := 

DISPL.RULE ( SHORT. RULE , LEN , SETTING 1 
END( 

END END( 



BEGIN MAIN 

GOOD ;= FALSER 
QUIT := FALSER 
REPEAT 
CLRSCRj 

HRITELN( 'HHICH SET OF NAVIGATION RULES ARE CURRENTLY IN EFFECT?' 

HRITELN( 'MAKE A NUMBER SELECTION THEN PRESS THE ENTER KEY.'U 
HRITELN( ' 1. INTERNATIONAL' 

WRITELNt ' 2. INLAND' 

READLN(RULE.SET)v 

WRITELN(RULE.SET)^ 

IF (RULE.SET <> 1) AND ( RULE.SET <> 2) THEN BEGIN 
WRITE LNj 

WRITELN( 'ILLEGAL ENTRY. RE-ENTER SELECTION. ') > 

WRITE LN( 'TO CONTINUE, PRESS ANY KEY . ' ) jWRITELN ^ 

WHILE NOT KEYPRESSED DO 
DELAY(l)j 

END 

ELSE 

GOOD := TRUEj 
UNTIL GOODj 

IF (RULE.SET = 1) THEN 
BUILD.RULES 
ELSE 

BUILD.RULES2J 

REPEAT 

LOW.VIS := 

FOG.SIG.CONTACT := FALSE > 

CONTINUE := TRUE > 

MID.RULE := ' '> 

MID.SI2E := Oj 
FACT.FIG := ' '> 

MAX.FAX := Oj 
MENU! 

SETTING := 

DELETEt MID.RULE, l,l)j 

INFER_ENG( MID.RULE ,MID.SI2E , SETTING ) v 

IF CONTINUE THEN BEGIN 

IF NOT FOG.SIG.CONTACT AND (RULE.SET = 1) THEN BEGIN 
RELATIVE.BRG^ 

TGT.ANGLE 

ENDv 

DELETE( FACT.FIG, 1,1)> 

SETTING ;= 

INFER.ENG( FACT.FIG, MAX.FAX, SETTING ) v 
WRITELN('DO YOU WISH TO ANALY2E ANOTHER CONTACT?' 

WRITELN('IF SO, ENTER A CAPITAL Y, THEN PRESS THE ENTER KEY.')> 
WRITELN( 'OTHERWISE, ENTER ANY OTHER LETTER,THEN PRESS THE ENTER KEY.')v 
READLNl ANS)J 
WRITELNt ANSn 

IF (ANS <> 'Y') AND (ANS <> 'y' ) THEN 
QUIT := TRUE> 
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END 

ELSE BEGIN 

NRITELNCTO CONTINUE, PRESS ANY KEY.*)> 
HHILE NOT KEYPRESSED DO 
DELAY(1)> 

END} 

UNTIL QUIT END, 
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APPENDIX B 

SAMPLE USER SESSIONS 



WHICH SET OF NAVIGATION RULES ARE CURRENTLY IN EFFECT? 

MAKE A NUMBER SELECTION THEN PRESS THE ENTER KEY. 

1. INTERNATIONAL 

2. INLAND 

1 

ENTER- THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COMMA. 

EXAMPLE: 2,6,16 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY :RADAR CONTACT. 

4. REDUCED VISIBILITY : SOUND SIGNAL HEARD FWD OF BEAM. 

5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. 

6. RED OVER GREEN. 9. RED OVER WHITE. 

7. RED OVER RED. 10. GREEN OVER WHITE. 

8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED. 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. 

12. TWO BLACK BALLS. 14. DOUBLE CONES. 

13. BALL DIAMOND BALL. 15. CYLINDER. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED 

16. PORT AND STBD RUNNING, MASTHEAD , RANGE . 

-,17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBD RUNNING, MASTHEAD, RANGE. 

19. STERN. 

1,13,18 

INTERPRETATION OF DAYSHAPE IS: 

WHEN DAYSHAPE IS BALL DIAMOND BALL, 

VESSEL IS RESTRICTED IN ITS' ABILITY TO MANEUVER. 

SEMANTIC ERROR. 

SELECTIONS 1 AND 18 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE. 
RE-ENTER SELECTION NUMBERS. 

TO CONTINUE, PRESS ANY KEY. 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST .NUMBERS SHOULD BE SEPARATED 
BY A COMMA. 

EXAMPLE: 2,6,16 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY :RADAR CONTACT. 

4. REDUCED VISIBILITY : SOUND SIGNAL HEARD FWD OF BEAM. 

5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. 

6. RED OVER GREEN. 9. RED OVER WHITE. 

7. RED OVER RED. 10. GREEN OVER WHITE. 

8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED. 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. 

12. TWO BLACK BALLS. 14. DOUBLE CONES. 

13. BALL DIAMOND BALL. 15. CYLINDER. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED 

16. PORT AND STBD RUNNING, MASTHEAD , RANGE . 

17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBD RUNNING, MASTHEAD, RANGE. 

19. STERN. 
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ENTER THE CONTACT'S TRUE BEARING IN THREE DIGIT FORMAT. 
182 

ENTER YOUR SHIP'S HEADING IN THREE DIGIT FORMAT. 

161 

ENTER THE MANEUVER-BOARD-SOLUTION CONTACT HEADING IN 
THREE DIGIT FORMAT. 

070 

ENTER THE VISUAL TARGET ANGLE IN THREE DIGIT FORMAT. 

160 

PROGRAM-COMPUTED TARGET ANGLE DIFFERS FROM VISUAL TARGET 
ANGLE AND WILL RESULT IN DIFFERENT MEETING SITUATIONS. 
PROGRAM- COMPUTED TARGET ANGLE IS 292 

RE-CHECK MANEUVERING BOARD SOLUTION AND VISUAL ASPECT. 



ENTER THE MANEUVER-BOARD-SOLUTION CONTACT HEADING IN 
THREE DIGIT FORMAT. 

070 



ENTER THE VISUAL TARGET ANGLE IN THREE DIGIT FORMAT. 

345 

CONCLUSION IS ; 

YOU ARE GIVE-WAY VESSEL. MANEUVER TO AVOID CONTACT. 

TURN STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS PORT FWD. 

TO CONTINUE, PRESS ANY KEY. 

DO YOU WISH TO ANALYZE ANOTHER CONTACT? 

IF SO, ENTER A CAPITAL Y, THEN PRESS THE ENTER KEY. 
OTHERWISE, ENTER ANY OTHER LETTER, THEN PRESS THE ENTER KEY. 
Y 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST .NUMBERS SHOULD BE SEPARATED 
BY A COMMA. 

EXAMPLE • 2 6 16 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY ;RADAR CONTACT. 

4. REDUCED VISIBILITY ;SOUND SIGNAL HEARD FWD OF BEAM. 

5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. 

6. RED OVER GREEN. 9. RED OVER WHITE. 

7. RED OVER RED. 10. GREEN OVER WHITE, 

8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED. 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. 

12. TWO BLACK BALLS. 14. DOUBLE CONES. 

13. BALL DIAMOND BALL. 15. CYLINDER. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED. 
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16. PORT AND STBD RUNNING, MASTHEAD, RANGE. 

17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBD RUNNING, MASTHEAD, RANGE. 

19. STERN. 

5,2,154 

ILLEGAL ENTRY. RE-ENTER SELECTION NUMBERS. 
TO CONTINUE, PRESS ANY KEY. 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COMMA. 

EXAMPLE: 2,6,16 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY : RADAR CONTACT. 

4. REDUCED VISIBILITY .-SOUND SIGNAL HEARD FWD OF BEAM. 

5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. 

6. RED OVER GREEN. 9. RED OVER WHITE. 

7. RED OVER RED. 10. GREEN OVER WHITE. 

8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED. 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. 

12. TWO BLACK BALLS. 14. DOUBLE CONES. 

13. BALL DIAMOND BALL. 15. CYLINDER. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED 

16. PORT AND STBD RUNNING .MASTHEAD , RANGE . 

17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBD RUNNING, MASTHEAD, RANGE. 

19. STERN. 

1,14,1 

SELECTION 1 IS DUPLICATED. 

RE-ENTER SELECTION NUMBERS. 

TO CONTINUE, PRESS ANY KEY. 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST .NUMBERS SHOULD BE SEPARATED 
BY A COMMA. 

EXAMPLE: 2,6,16 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY :RADAR CONTACT. 

4. REDUCED VISIBILITY :SOUND SIGNAL HEARD FWD OF BEAM. 

5. OWN SHIP CURRENTLY HAS SPECIAL STATUS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS IS OBSERVED. 

6. RED OVER GREEN. 9. RED OVER WHITE. 

7. RED OVER RED. 10. GREEN OVER WHITE. 

8. RED OVER WHITE OVER RED. 11. RED OVER RED OVER RED. 

ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED. 

12. TWO BLACK BALLS. 14. DOUBLE CONES. 

13. BALL DIAMOND BALL. 15. CYLINDER. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED 

16. PORT AND STBD RUNNING, MASTHEAD, RANGE. 

17. PORT RUNNING, MASTHEAD, RANGE. 

18. STBD RUNNING, MASTHEAD, RANGE. 

19. STERN. 

18,2,11 

INTERPRETATION OF SPECIAL LIGHTS IS: 

WHEN LIGHTING PATTERN IS RED OVER RED OVER RED, 

VESSEL IS CONSTRAINED BY ITS' DRAFT. 



ENTER THE CONTACT'S TRUE BEARING IN THREE DIGIT FORMAT. 
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013 



ENTER YOUR SHIP'S HEADING IN THREE DIGIT FORMAT. 

101 

ENTER THE MANEUVER-BOARD-SOLUTION CONTACT HEADING IN 
THREE DIGIT FORMAT. 

177 



CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. YOU ARE GIVE-WAY VESSEL. 
MANEUVER TO AVOID CONTACT. TURN STBD IF POSSIBLE. 

SHOW ONE LIGHT FLASH TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

. TARGET ANGLE IS STBD FWD. 

CONTACT HAS SPECIAL STATUS. 

TO CONTINUE, PRESS ANY KEY. 

DO YOU WISH TO ANALYZE ANOTHER CONTACT? 

IF SO, ENTER A CAPITAL Y, THEN PRESS THE ENTER KEY. 
OTHERWISE, ENTER ANY OTHER LETTER, THEN PRESS THE ENTER KEY. 
N 



WHICH SET OF NAVIGATION RULES ARE CURRENTLY IN EFFECT? 
MAKE A NUMBER SELECTION THEN PRESS THE ENTER KEY. 

1. INTERNATIONAL 

2 . INLAND 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COMMA. EXAMPLE: 2,6 . A SECOND MENU WILL DISPLAY ADDITIONAL 
CONDITIONS WHEN THE ENTER KEY IS PRESSED. 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY : FOG SIGNAL HEARD FWD OF BEAM. 

4. CONTACT IS A SAILING VESSEL UNDER SAIL. 

ONE OF THE FOLLOWING MEETING SITUATIONS EXISTS; 

5. CONTACT CROSSING FROM PORT TO STBD. 

6. CONTACT CROSSING FROM STBD TO PORT. 

7. MEETING CONTACT HEAD TO HEAD. 

8. OVERTAKING CONTACT. 9. BEING OVERTAKEN BY CONTACT. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED; 

10. PORT AND STBD RUNNING, MASTHEAD, RANGE . 

11. PORT RUNNING, MASTHEAD, RANGE. 

12. STBD RUNNING, MASTHEAD, RANGE. 

13. STERN. 

1,5 

CONTINUE NUMBER SELECTION WITH THE CONDITIONS BELOW. ONLY ONE 
SELECTION WILL NORMALLY BE MADE FROM THIS MENU, SO NO COMMAS 
SHOULD BE NEEDED. EXAMPLE; 17 
ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED: 

14. BASKET. 19. ONE BLACK BALL. 

15. TWO ORANGE & WHITE VERTICALLY STRIPED BALLS. 

16. DIAMOND, TOP HALF BLACK & WHITE STRIPED , LOWER HALF SOLID RED. 

17. BLACK & WHITE STRIPED BALL OVER SOLID RED BALL. 

13. TWO BLACK BALLS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS: 

20. RED OVER WHITE. 26. RED OVER RED. 

21. WHITE OVER RED OVER RED OVER WHITE. 

22. WHITE OVER RED OVER RED. 
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23. WHITE OVER RED OVER RED OVER RED OVER RED. 

24. RED OVER RED OVER RED. 

25. ONE WHITE FWD AND ONE WHITE AFT. 

14 

THE COMPLETE SELECTION FOR THIS INLAND SITUATION IS 1,5,14 
INTERPRETATION OF DAYSHAPE IS: 

WHEN DAYSHAPE IS A BASKET, 

THE VESSEL IS ENGAGED IN FISHING. 

CONCLUSION IS; 

YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

CONTACT IS CROSSING FROM PORT TO STBD. 

TO CONTINUE, PRESS ANY KEY. 

DO YOU WISH TO ANALYZE ANOTHER CONTACT? 

IF SO, ENTER A CAPITAL Y, THEN PRESS THE ENTER KEY. 
OTHERWISE, ENTER ANY OTHER LETTER, THEN PRESS THE ENTER KEY. 
Y 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COraiA. EXAMPLE: 2,6 . A SECOND MENU WILL DISPLAY ADDITIONAL 
CONDITIONS WHEN THE ENTER KEY IS PRESSED. 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY :FOG SIGNAL HEARD FWD OF BEAM. 

4. CONTACT IS A SAILING VESSEL UNDER SAIL. 

ONE OF THE FOLLOWING MEETING SITUATIONS EXISTS: 

5. CONTACT CROSSING FROM PORT TO STBD. 

6. CONTACT CROSSING FROM STBD TO PORT. 

7. MEETING CONTACT HEAD TO HEAD. 

8. OVERTAKING CONTACT. 9. BEING OVERTAKEN BY CONTACT.^ 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED: 

10. PORT AND STBD RUNNING , MASTHEAD , RANGE . 

11. PORT RUNNING, MASTHEAD, RANGE. 

12. STBD RUNNING, MASTHEAD, RANGE. 

13. STERN. 

3,2,5,12 

CONTINUE NUMBER SELECTION WITH THE CONDITIONS BELOW. ONLY ONE 
SELECTION WILL NORMALLY BE MADE FROM THIS MENU, SO NO COMMAS 
SHOULD BE NEEDED. EXAMPLE: 17 
ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED: 

14. BASKET. 19. ONE BLACK BALL. 

15. TWO ORANGE & WHITE VERTICALLY STRIPED BALLS. 

16. DIAMOND, TOP HALF BLACK & WHITE STRIPED , LOWER HALF SOLID RED. 

17. BLACK & WHITE STRIPED BALL OVER SOLID RED BALL. 

18. TWO BLACK BALLS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS: 

20. RED OVER WHITE. 26. RED OVER RED. 

21. WHITE OVER RED OVER RED OVER WHITE. 

22. WHITE OVER RED OVER RED. 

23. WHITE OVER RED OVER RED OVER RED OVER RED. 

24. RED OVER RED OVER RED. 

25. ONE WHITE FWD AND ONE WHITE AFT. 

THE COMPLETE SELECTION FOR THIS INLAND SITUATION IS 3,2,5,12 
SEMANTIC ERROR. 

SELECTIONS 12 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

RE-ENTER SELECTION NUMBERS. 

TO CONTINUE, PRESS ANY KEY. 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
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CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COMMA. EXAMPLE: 2,6 . A SECOND MENU WILL DISPLAY ADDITIONAL 
CONDITIONS WHEN THE ENTER KEY IS PRESSED. 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY: FOG SIGNAL HEARD FWD OF BEAM. 

4. CONTACT IS A SAILING VESSEL UNDER SAIL. 

ONE OF THE FOLLOWING MEETING SITUATIONS EXISTS: 

5. CONTACT CROSSING FROM PORT TO STBD. 

6. CONTACT CROSSING FROM STBD TO PORT. 

7. MEETING CONTACT HEAD TO HEAD. 

8. OVERTAKING CONTACT. 9. BEING OVERTAKEN BY CONTACT. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED: 

10. PORT AND STBD RUNNING, MASTHEAD, RANGE. 

11. PORT RUNNING, MASTHEAD, RANGE. 

12. STBD RUNNING, MASTHEAD, RANGE. 

13. STERN. 

2,3 

CONTINUE NUMBER SELECTION WITH THE CONDITIONS BELOW. ONLY ONE 
SELECTION WILL NORMALLY BE MADE FROM THIS MENU, SO NO COMMAS 
SHOULD BE NEEDED. EXAMPLE: 17 
ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED: 

14. BASKET. 19. ONE BLACK BALL. 

15. TWO ORANGE & WHITE VERTICALLY STRIPED BALLS. 

16. DIAMOND, TOP HALF BLACK & WHITE STRIPED, LOWER HALF SOLID .RED. 

17. BLACK & WHITE STRIPED BALL OVER SOLID RED BALL. 

18. TWO BLACK BALLS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS: 

20. RED OVER WHITE. 26. RED OVER RED. 

21. WHITE OVER RED OVER RED OVER WHITE. 

22. WHITE OVER RED OVER RED. 

23. WHITE OVER RED OVER RED OVER RED OVER RED. 

24. RED OVER RED OVER RED. 

25. ONE WHITE FWD AND ONE WHITE AFT. 

THE COMPLETE SELECTION FOR THIS INLAND SITUATION IS 2,3 
CONCLUSION IS: 

REDUCE SPEED TO BARE STEERAGE-WAY. PROCEED WITH EXTREME 
CAUTION UNTIL THE DANGER OF COLLISION IS OVER. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. 

TO CONTINUE, PRESS ANY KEY. 

DO YOU WISH TO ANALYZE ANOTHER CONTACT? 

IF SO, ENTER A CAPITAL Y, THEN PRESS THE ENTER KEY. 

OTHERWISE, ENTER ANY OTHER LETTER, THEN PRESS THE ENTER KEY. 

Y 



ENTER THE CORRESPONDING NUMBER FOR ANY OF THE FOLLOWING 
CONDITIONS THAT CURRENTLY EXIST. NUMBERS SHOULD BE SEPARATED 
BY A COMMA. EXAMPLE: 2,6 . A SECOND MENU WILL DISPLAY ADDITIONAL 
CONDITIONS WHEN THE ENTER KEY IS PRESSED. 

1. TIME PERIOD IS AFTER SUNRISE AND BEFORE SUNSET. 

2. TIME PERIOD IS AFTER SUNSET AND BEFORE SUNRISE. 

3. REDUCED VISIBILITY: FOG SIGNAL HEARD FWD OF BEAM. 

4. CONTACT IS A SAILING VESSEL UNDER SAIL. 

ONE OF THE FOLLOWING MEETING SITUATIONS EXISTS: 

5. CONTACT CROSSING FROM PORT TO STBD. 

6. CONTACT CROSSING FROM STBD TO PORT. 

7. MEETING CONTACT HEAD TO HEAD. 

8. OVERTAKING CONTACT. 9. BEING OVERTAKEN BY CONTACT. 

ONE OF THE FOLLOWING STANDARD LIGHTING PATTERNS IS OBSERVED: 

10. PORT AND STBD RUNNING, MASTHEAD, RANGE. 

11. PORT RUNNING, MASTHEAD, RANGE. 

12. STBD RUNNING, MASTHEAD, RANGE. 
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13. STERN. 

6,2,11 

CONTINUE NUMBER SELECTION WITH THE CONDITIONS BELOW. ONLY ONE 
SELECTION WILL NORMALLY BE MADE FROM THIS MENU, SO NO COMMAS 
SHOULD BE NEEDED. EXAMPLE: 17 
ONE OF THE FOLLOWING DAYSHAPES IS OBSERVED: 

14. BASKET. 19. ONE BLACK BALL. 

15. TWO ORANGE & WHITE VERTICALLY STRIPED BALLS. 

16. DIAMOND, TOP HALF BLACK & WHITE STRIPED , LOWER HALF SOLID RED. 

17. BLACK & WHITE STRIPED BALL OVER SOLID RED BALL. 

18. TWO BLACK BALLS. 

ONE OF THE FOLLOWING SPECIAL LIGHTING PATTERNS: 

20. RED OVER WHITE. 26. RED OVER RED. 

21. WHITE OVER RED OVER RED OVER WHITE. 

22. WHITE OVER RED OVER RED. 

23. WHITE OVER RED OVER RED OVER RED OVER RED. 

24. RED OVER RED OVER RED. 

25. ONE WHITE FWD AND ONE WHITE AFT. 

22 

THE COMPLETE SELECTION FOR THIS INLAND SITUATION IS 6,2,11,22 
INTERPRETATION OF SPECIAL LIGHTS IS: 

WHEN LIGHTING PATTERN IS WHITE OVER RED OVER RED, 

THE VESSEL IS ENGAGED IN DREDGING. 

CONCLUSION IS; 

WHEN WITHIN ONE MILE OF CONTACT, INDICATE INTENTION TO PASS 
WITH ONE LONG BLAST. CONTACT WILL DIRECT YOU TO PROPER SIDE 
FOR PASSAGE WITH ONE SHORT BLAST FOR A STBD PASSAGE OR TWO 
SHORT BLASTS FOR A PORT PASSAGE. ANSWER WITH SAME SIGNAL TO 
ACKNOWLEDGE. IF CONTACT SOUNDS DANGER SIGNAL, FOUR OR MORE 
SHORT BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO PASS. 

SLOW DOWN OR STOP AND AWAIT FURTHER SIGNAL. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

THE VESSEL IS ENGAGED IN DREDGING. 

TO CONTINUE, PRESS ANY KEY. 

DO YOU WISH TO ANALYZE ANOTHER CONTACT? 

IF SO, ENTER A CAPITAL Y, THEN PRESS THE ENTER KEY. 

OTHERWISE, ENTER ANY OTHER LETTER, THEN PRESS THE ENTER KEY. 

N 
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APPENDIX C 

INTERNATIONAL RULES: CODED AND DECODED 



RULE ISsWstx 21 
CONCLUSION IS; 

SEMANTIC ERROR. 

SELECTIONS 12 AND 4 AND 6 AND 

RUN_LTS ARE NOT COMPATIBLE. LIGHTS OR DAYSHAPES CAN NOT 
NORMALLY BE SEEN DURING REDUCED VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

DAYSHAPE IS BASKET. 

REDUCED VISIBILITY:FOG SIGNAL FWD OF BEAM. 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

WHEN SPECIAL LIGHTING CONFIGURATION IS; 

RED OVER WHITE 

RULE IS;axt 10 
CONCLUSION IS; 

SEMANTIC ERROR. 

SELECTIONS 1 AND 6 AND 18 

ARE NOT COMPATIBLE. LIGHTS OF ANY TYPE ARE NOT NORMALLY 
DISPLAYED AFTER SUNRISE. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TIME = DAY. 

WHEN SPECIAL LIGHTING CONFIGURATION IS; 

RED OVER WHITE 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

RULE IS:Wst 20 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 12 AND 18 AND 4 

ARE NOT COMPATIBLE. LIGHTS OR DAYSHAPES CAN NOT 
NORMALLY BE SEEN DURING REDUCED VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

DAYSHAPE IS BASKET. 

REDUCED VISIBILITY; FOG SIGNAL FWD OF BEAM. 

WHEN STANDARD LIGHTING CONFIGURATION IS; 

STERN 

RULE IS:XSt 15 
CONCLUSION IS; 

SEMANTIC ERROR 

SELECTIONS 18 AND 6 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

WHEN SPECIAL LIGHTING CONFIGURATION IS; 

RED OVER WHITE 

REDUCED VISIBILITY;FOG SIGNAL FWD OF BEAM. 

WHEN STANDARD LIGHTING CONFIGURATION IS; 

STERN 

RULE IS; at 9 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 1 AND 18 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE. 
WHEN THE FOLLOWING FACTS ARE TRUE; 

TIME = DAY. 

WHEN STANDARD LIGHTING CONFIGURATION IS; 

STERN 
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RULE IS: ax 8 
CONCLUSION IS; 

TrpPOR 

SELECTIONS 1 AND 6 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE. 
WHEN THE FOLLOWING FACTS ARE TRUE; 

TIME = DAY. 

WHEN SPECIAL LIGHTING CONFIGURATION IS; 

RED OVER WHITE 

RULE IS;SW 12 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 12 AND 3 ARE NOT COMPATIBLE. 

DAYSHAPES CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY;FOG SIGNAL FWD OF BEAM. 

DAYSHAPE IS BASKET. 

RULE IS:ab 19 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 1 AND 2 ARE NOT COMPATIBLE. 

THE TWO POSSIBLE TIME-PERIODS CAN NOT OCCUR TOGETHER. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

TIME = DAY. 

TIME = NIGHT. 

RULE IS: St 14 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 18 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

RULE IS;UX 13 
CONCLUSION IS; 

SEMANTIC ERROR. 

SELECTIONS 6 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: RADAR CONTACT. 

WHEN SPECIAL LIGHTING CONFIGURATION IS: 

RED OVER WHITE 

RULE IS:bw 11 
CONCLUSION IS; 

SEMANTIC ERROR. 

SELECTIONS 1 AND 12 ARE NOT COMPATIBLE. ■ 

DAYSHAPES ARE NOT NORMALLY DISPLAYED AFTER SUNSET. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TIME = NIGHT. 

DAYSHAPE IS BASKET. 

RULE IS:C2 2 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. YOU ARE GIVE-WAY VESSEL. 
MANEUVER TO AVOID CONTACT. TURN STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

TARGET ANGLE IS STBD FWD. 

CONTACT HAS SPECIAL STATUS. 
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RULE IS:C 1 
CONCLUSION IS; 

YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED. 
WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS STBD FWD. 

RULE IS:ev 4 
CONCLUSION IS; 

OWN SHIP HAS SPECIAL STATUS. YOU ARE STAND-ON VESSEL 
MAINTAIN COURSE AND SPEED. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS PORT FWD. 

OWN SHIP HAS SPECIAL STATUS. 

RULE IS;e 3 
CONCLUSION IS; 

YOU ARE GIVE-WAY VESSEL. MANEUVER TO AVOID CONTACT. 
TURN STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

TARGET ANGLE IS PORT FWD. 

RULE IS;h 1 
CONCLUSION IS; 

YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED. 
WHEN THE FOLLOWING FACTS ARE TRUE: 

RELATIVE BRG IS AFT. 

RULE IS:d 3 
CONCLUSION IS; 

YOU ARE GIVE-WAY VESSEL. MANEUVER TO AVOID CONTACT. 
TURN' STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS AFT. 

RULE IS;fv 4 
CONCLUSION IS; 

OWN SHIP HAS SPECIAL STATUS. YOU ARE STAND-ON VESSEL 
MAINTAIN COURSE AND SPEED. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS 000. 

OWN SHIP HAS SPECIAL STATUS. 

RULE IS:fz 3 
CONCLUSION IS; 

YOU ARE GIVE -WAY VESSEL. MANEUVER TO AVOID CONTACT. 
TURN STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS 000. 

CONTACT HAS SPECIAL STATUS. 

RULE IS;f 5 
CONCLUSION IS: 

BOTH SHIPS MUST GIVE WAY. ALTER COURSE TO STBD TO 
AVOID CONTACT. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

TARGET ANGLE IS 000. 

RULE IS:1 6 
CONCLUSION IS: 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

WHEN LIGHTING PATTERN IS RED OVER GREEN, 

CONTACT IS A SAILING VESSEL. 
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RULE IStm 6 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

WHEN DAYSHAPE IS TWO BLACK BALLS, 

VESSEL IS NOT UNDER COMMAND. 

RULE IS;n 6 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

WHEN DAYSHAPE IS BALL DIAMOND BALL, 

VESSEL IS RESTRICTED IN ITS’ ABILITY TO MANEUVER. 

RULE IS;0 6 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

WHEN LIGHTING PATTERN IS RED OVER WHITE, 

VESSEL IS ENGAGED IN FISHING. 

RULE IS:p 6 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

WHEN LIGHTING IS GREEN OVER WHITE, 

VESSEL IS ENGAGED IN TRAWLING. 

RULE IS;a 6 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE;-> 

WHEN DAYSHAPE IS CYLINDER, 

VESSEL IS CONSTRAINED BY ITS' DRAFT. 

RULE IS;r 6 
CONCLUSION IS; 

CONTACT HAS SPECIAL STATUS. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

WHEN DAYSHAPE IS DOUBLE CONES, 

VESSEL IS ENGAGED IN FISHING OR TRAWLING. 

RULE IS:* 7 
CONCLUSION IS: 

REDUCE SPEED TO BARE STEERAGE-WAY. PROCEED WITH EXTREME 
CAUTION UNTIL THE DANGER OF COLLISION IS OVER. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY :FOG SIGNAL FWD OF BEAM. 
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APPENDIX D 

INLAND RULES: CODED AND DECODED 



RULE IS:S?!& 21 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 12 AND 4 AND 6 AND 

RUN_LTS ARE NOT COMPATIBLE. LIGHTS OR DAYSHAPES CAN NOT 
NORMALLY BE SEEN DURING REDUCED VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. 

WHEN SPECIAL LIGHTING CONFIGURATION IS: 

RED OVER WHITE 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

DAYSHAPE IS BASKET. 

RULE IS:s!& 20 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 12 AND 18 AND 4 

ARE NOT COMPATIBLE. LIGHTS OR DAYSHAPES CAN NOT 
NORMALLY BE SEEN DURING REDUCED VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. ‘ 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 3 

DAYSHAPE IS BASKET. 

RULE IS:S?! 15 
CONCLUSION IS: 

SEMANTIC ERROR* 

SELECTIONS 18 AND 6 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY :FOG SIGNAL FWD OF BEAM. 

WHEN SPECIAL LIGHTING CONFIGURATION IS: 

RED OVER WHITE 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

RULE IS:@!? 10 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 1 AND 6 AND 18 

ARE NOT COMPATIBLE. LIGHTS OF ANY TYPE ARE NOT NORMALLY 
DISPLAYED AFTER SUNRISE. 

WHEN THE FOLLOWING FACTS ARE TRUE : 

TIME = DAY. 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

WHEN SPECIAL LIGHTING CONFIGURATION IS: 

RED OVER WHITE 

RULE IS:@! 9 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 1 AND 18 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE. 
WHEN THE FOLLOWING FACTS ARE TRUE: 

TIME = DAY. 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 
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RULE IS:@? 8 
CONCLUSION IS: 

<^FMAMTTr FRROR 

SELECTIONS 1 AND 6 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE ARE NOT NORMALLY SEEN AFTER SUNRISE. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

TIME = DAY. 

WHEN SPECIAL LIGHTING CONFIGURATION IS: 

RED OVER WHITE 

RULE IS:#& 11 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 1 AND 12 ARE NOT COMPATIBLE. 

DAYSHAPES ARE NOT NORMALLY DISPLAYED AFTER SUNSET. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

TIME = NIGHT. 

DAYSHAPE IS BASKET. 

RULE IS:S& 12 
CONCLUSION IS: 

SELECTIONS 12 AND 3 ARE NOT COMPATIBLE. 

DAYSHAPES CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. 

DAYSHAPE IS BASKET. 

RULE IS:S? 13 
CONCLUSION IS: 

SEMANTIC ERROR. 

SELECTIONS 6 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. 

WHEN SPECIAL LIGHTING CONFIGURATION IS: 

RED OVER WHITE 

RULE IS:s! 14 
CONCLUSION IS: 

<^FMaWTTr FRRDR 

SELECTIONS 18 AND 3 ARE NOT COMPATIBLE. 

LIGHTS OF ANY TYPE CAN NOT NORMALLY BE SEEN DURING REDUCED 
VISIBILITY CONDITIONS. 

WHEN THE FOLLOWING FACTS ARE TRUE : 

REDUCED VISIBILITY:FOG SIGNAL FWD OF BEAM. 

WHEN STANDARD LIGHTING CONFIGURATION IS: 

STERN 

RULE IS:#@ 19 
CONCLUSION IS: 

<^FMAMTTr FRRnR 

SELECTIONS 1 AND 2 ARE NOT COMPATIBLE. 

THE TWO POSSIBLE TIME-PERIODS CAN NOT OCCUR TOGETHER. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

TIME = DAY. 

TIME = NIGHT. 

RULE IS:W 25 
CONCLUSION IS: 

REDUCE SPEED TO ENSURE SAFETY OF BOTH VESSELS. WHEN PASSING 
WITHIN 200 FT. OF CONTACT, REDUCE SPEED TO 5 MPH OR LESS. 
WHEN THE FOLLOWING FACTS ARE TRUE : 

THE VESSEL IS ENGAGED IN SERVICING NAVIGATION AIDS. 

RULE IS:L 25 
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CONCLUSION IS; 

REDUCE SPEED TO ENSURE SAFETY OF BOTH VESSELS. WHEN PASSING 
WITHIN 200 FT. OF CONTACT, REDUCE SPEED TO 5 MPH OR LESS. 
WHEN THE FOLLOWING FACTS ARE TRUE: 

THE VESSEL IS ENGAGED IN SERVICING NAVIGATION AIDS. 

RULE IS:U 26 
CONCLUSION IS; 

WHEN WITHIN ONE MILE OF CONTACT, INDICATE INTENTION TO PASS 
WITH ONE LONG BLAST. CONTACT WILL DIRECT YOU TO PROPER SIDE 
FOR PASSAGE WITH ONE SHORT BLAST FOR A STBD PASSAGE OR TWO 
SHORT BLASTS FOR A PORT PASSAGE. ANSWER WITH SAME SIGNAL TO 
ACKNOWLEDGE. IF CONTACT SOUNDS DANGER SIGNAL, FOUR OR MORE 
SHORT BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO PASS. 
SLOW DOWN OR STOP AND AWAIT FURTHER SIGNAL. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

THE VESSEL IS ENGAGED IN LAYING CABLE. 



RULE IS;N 26 
CONCLUSION IS: 

WHEN WITHIN ONE MILE OF CONTACT, INDICATE INTENTION TO PASS 
WITH ONE LONG BLAST. CONTACT WI-LL DIRECT YOU TO PROPER SIDE 
FOR PASSAGE WITH ONE SHORT BLAST FOR A STBD PASSAGE OR TWO 
SHORT blasts for A PORT PASSAGE. ANSWER WITH SAME SIGNAL TO 
ACKNOWLEDGE. IF CONTACT SOUNDS DANGER SIGNAL, FOUR OR MORE 
SHORT BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO PASS. 
SLOW DOWN OR STOP AND AWAIT FURTHER SIGNAL. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

THE VESSEL IS ENGAGED IN LAYING CABLE. 

RULE IS:V 28 
CONCLUSION IS; 

MANEUVER TO AVOID A VESSEL AT ANCHOR. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

THE VESSEL IS ANCHORED. 

RULE IS:P 28 
CONCLUSION IS: 

MANEUVER TO AVOID A VESSEL AT ANCHOR. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

THE VESSEL IS ANCHORED. 

RULE IS;0 26 
CONCLUSION IS; 

WHEN WITHIN ONE MILE OF CONTACT, INDICATE INTENTION TO PASS 
WITH ONE LONG BLAST. CONTACT WILL DIRECT YOU TO PROPER SIDE 
FOR PASSAGE WITH ONE SHORT BLAST FOR A STBD PASSAGE OR TWO 
SHORT BLASTS FOR A PORT PASSAGE. ANSWER WITH SAME SIGNAL TO 
ACKNOWLEDGE. IF. CONTACT SOUNDS DANGER SIGNAL, FOUR OR MORE 
SHORT BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO PASS. 
SLOW DOWN OR STOP AND AWAIT FURTHER SIGNAL. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

-THE VESSEL IS ENGAGED IN DREDGING. 

RULE IS;S 26 
CONCLUSION IS; 

WHEN WITHIN ONE MILE OF CONTACT, INDICATE INTENTION TO PASS 
WITH ONE LONG BLAST. CONTACT WILL DIRECT YOU TO PROPER SIDE 
FOR PASSAGE WITH ONE SHORT BLAST FOR A STBD PASSAGE OR TWO 
SHORT BLASTS FOR A PORT PASSAGE. ANSWER WITH SAME SIGNAL TO 
ACKNOWLEDGE. IF CONTACT SOUNDS DANGER SIGNAL, FOUR OR MORE 
SHORT BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO PASS. 
SLOW DOWN OR STOP AND AWAIT FURTHER SIGNAL. 

WHEN THE FOLLOWING FACTS ARE TRUE; 

THE VESSEL IS ENGAGED IN DREDGING. 

RULE IS;A 24 
CONCLUSION IS: 
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YOU MUST KEEP OUT OF THE WAY OF SAILING VESSELS UNLESS YOU 
ARE CONSTRAINED BY A NARROW CHANNEL. IF YOU ARE CONSTRAINED 
AND A CLOSE QUARTER SITUATION IS EMINENT, SOUND THE DANGER 
SIGNAL, FOUR OR MORE SHORT BLASTS IN RAPID SUCCESSION. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

CONTACT IS A SAILING VESSEL UNDER SAIL. 

RULE IS;B 1 
CONCLUSION IS: 

YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

CONTACT IS CROSSING FROM PORT TO STBD. 

RULE IS:C 3 
CONCLUSION IS: 

YOU ARE GIVE-WAY VESSEL. MANEUVER TO AVOID CONTACT. 

TURN STBD IF POSSIBLE. 

SOUND ONE SHORT BLAST TO SIGNAL A STBD TURN. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

CONTACT IS CROSSING FROM STBD TO PORT. 

RULE IS:D 22 
CONCLUSION IS: 

BOTH SHIPS MUST GIVE WAY. GIVE ONE SHORT BLAST TO SIGNAL 
YOUR INTENTION TO ALTER COURSE TO STBD OR ANSWER THE 
CONTACT'S SIGNAL WITH THE SAME SIGNAL. DO NOT ALTER COURSE 
UNTIL YOU AND THE CONTACT HAVE MATCHED SIGNALS. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

MEETING CONTACT HEAD TO HEAD. 

RULE IS:E 23 
CONCLUSION IS: 

YOU ARE GIVE-WAY VESSEL. SOUND ONE SHORT BLAST IF YOU 
INTEND TO OVERTAKE ON THE STBD SIDE OR TWO SHORT BLASTS IF 
YOU INTEND TO OVERTAKE ON THE PORT SIDE. WAIT FOR 
THE SAME SIGNAL IN AGREEMENT BEFORE OVERTAKING. IF THE 
CONTACT ANSWERS WITH THE DANGER SIGNAL, FOUR OR MORE SHORT 
BLASTS IN RAPID SUCCESSION, DO NOT ATTEMPT TO OVERTAKE THE 
CONTACT . 

WHEN THE FOLLOWING FACTS ARE TRUE: 

OVERTAKING THE CONTACT. 

RULE IS:F 27 
CONCLUSION IS: 

YOU ARE STAND-ON VESSEL. MAINTAIN COURSE AND SPEED. 

ANSWER PASSING VESSEL'S INDICATION OF DESIRED SIDE TO PASS 
WITH SAME SIGNAL IF IT IS SAFE, BUT ANSWER WITH THE DANGER 
SIGNAL, FOUR OR MORE SHORT BLASTS IN RAPID SUCCESSION, IF 
THERE IS A DANGER. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

BEING OVERTAKEN BY THE CONTACT. 

RULE IS:* 7 
CONCLUSION IS: 

REDUCE SPEED TO BARE STEERAGE -WAY . PROCEED WITH EXTREME 
CAUTION UNTIL THE DANGER OF COLLISION IS OVER. 

WHEN THE FOLLOWING FACTS ARE TRUE: 

REDUCED VISIBILITY: FOG SIGNAL FWD OF BEAM. 
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